求高人指点!!!利用excel的数据,用mschart作折线图!

qdyl8764 2007-08-17 12:01:01
用mschart作图时,数据是从excel里调出的,假设有9个数据,要分三条折线(每3个点一条线啦)画出,...我不知道怎么调啊!!!
作出的图形的x轴是要表明数字刻度的....我标不出来啊...而且刻度老是只显示在两条刻度线的中间,而不是我们平时画图时的刻度线的正下方或偏又的位置...
怎么办啊???
最好给代码!万分感激...
...全文
330 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
junehuang111 2011-05-18
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
Dim adoCnn As New ADODB.Connection
Dim adoRst As New ADODB.Recordset
adoCnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & filepath & ";Extended Properties='Excel 8.0;HDR=Yes'"
adoRst.Open "Select time,tt From [sheet1$] ", adoCnn, adOpenKeyset, adLockOptimistic ‘sql查询语句,time,tt代表数据的列,想要几列数据就加几个,
'Set Me.MSHFlexGrid1.DataSource = adoRst '数据显示在MSHFlexGrid中

'图标绑定数据源 绑定到excel的数据中
With MSChart1
.ShowLegend = True
Set .DataSource = adoRst
.ChartType = VtChChartType2dLine

End With
end sub
赵4老师 2011-05-18
  • 打赏
  • 举报
回复
哈!没准还能从这个论坛里面翻出“哥德巴赫猜想”问题呢!
z_wenqian 2011-05-18
  • 打赏
  • 举报
回复
07年的贴,楼上的是怎么翻出来的,俄地神呀。
贝隆 2011-05-18
  • 打赏
  • 举报
回复
flfq 2011-05-18
  • 打赏
  • 举报
回复
[Quote=引用 6 楼 junehuang111 的回复:]
引用 4 楼 z_wenqian 的回复:
07年的贴,楼上的是怎么翻出来的,俄地神呀。


正好也在学mschart绘图的使用 就百度到了
[/Quote]
考古砖家
junehuang111 2011-05-18
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 z_wenqian 的回复:]
07年的贴,楼上的是怎么翻出来的,俄地神呀。
[/Quote]

正好也在学mschart绘图的使用 就百度到了
qdyl8764 2007-08-18
  • 打赏
  • 举报
回复
都过了一个晚上了,怎么还没有人教我啊。。。
天理何在啊???
伤心的来。。。555。。。
qdyl8764 2007-08-17
  • 打赏
  • 举报
回复
怎么都没人顶啊!!!
我自己先顶下~

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧