当前位置:编程学习 > VB >>

怎么vb中调用excel表格中的数据绘制曲线

vb中怎么调用excel表格中的数据绘制曲线?例如
0.61 0.83
0.63 0.85
0.52 0.86
0.31 0.87
0.20 0.87
0.14 0.88
这组数据,我想用此组数据来绘制一曲线,请问如何做?
能否给发一个这方面的代码,谢谢了。 --------------------编程问答-------------------- 这是两个问题:
1 如何将 Excel 中的数据提取出来。
  我建议用 ADO 数据库引擎读入记录集。因为 Excel 是 Jet 引擎支持的外部数据库。

Dim cn As New ADODB.Connection, rs As New ADODB.Recordset

cn.CursorLocation = adUseClient
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\somepath\filename.xls;Extended Properties=""Excel 8.0;HDR=No"""
rs.Open "SELECT * FROM [Sheet1$]", cn

2 如何用取得的数据画图

  方法也很多。例如用 Picture 控件:
x1 = rs.Fields(0) * Picture1.Width
y1 = rs.Fields(1) * Picture1.Height

rs.MoveNext

Do Until rs.EOF
    Picture1.Line (x1, y1)-(rs.Fields(0) * Picture1.Width, rs.Fields(1) * Picture1.Height)
    x1 = rs.Fields(0) * Picture1.Width
    y1 = rs.Fields(1) * Picture1.Height
    rs.MoveNext
Loop --------------------编程问答--------------------  谢谢.楼上的,最近正在为Excel数据变为图表烦恼呢... --------------------编程问答-------------------- 补充一下,在打开excel文件的时候,我还需要来选择excel文件,并不是单纯的某个指定excel文件。 --------------------编程问答-------------------- 补充一下,就是我在打开excel的时候,并不是单纯的打开某个指定的文件。 --------------------编程问答-------------------- 补充一下,我做的时候需要打开excel文件,并不是单纯的打开某一个指定位置的文件
补充:VB ,  基础类
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,