用vb6.0在指定txt文件中提取记录并绘图
发布网友
发布时间:2024-05-13 17:54
我来回答
共2个回答
热心网友
时间:2024-06-09 09:51
手边没有VB6,大致思路是:定义坐标平面,提取数据,画点,连线
form1.width=5000
form1.height=5000
form1.scale (-10,40)-(40,-10)
form1.autoredraw=true
'提取数据到数组in( , ),因为不知道你的外部文件是怎样储存的,所以不写
line (0,40)-(0,-10)
line (-10,0)-(40,0)
form1.drawwidth=5
for i=0 to ubound(in,1)
pset (in(i,0),in(i,1))
next
for i=0 to ubound(in,1)-1
line (in(i,0),in(i,1))-(in(i+1,0),in(i+1,1))
next
热心网友
时间:2024-06-09 09:52
把这个文本文件发给我,我帮你写下。Q Q 5850 7961