MSFlexGrid的问题 牛逼人进来一下

Question

我已经把txt的数据读到MSFlexGrid中，共2列， 我现在想把数据画曲线（两列分别为第一列x,第二列y轴） 在新的form里的picture里画图，只要一按按钮就能画。 不知道怎么办？希望高手们能给个答案，带说明文字最好，高分奉上！

Answer 1

下列代码模拟楼主的问题
'Form1代码
Private Sub Form_Load()
MSFlexGrid1.Rows = 21
MSFlexGrid1.Cols = 3
For j = 1 To 20
MSFlexGrid1.TextMatrix(j, 1) = j
Next
For j = 1 To 20
MSFlexGrid1.TextMatrix(j, 2) = j * 10
Next
Form2.Show
End Sub
'Form2代码
Private Sub Command1_Click()
Picture1.DrawWidth = 3
Picture1.ScaleLeft = 0
Picture1.ScaleTop = 0
Picture1.ScaleWidth = 20
Picture1.ScaleHeight = 200
Picture1.AutoRedraw = True
Picture1.ForeColor = vbRed
I = 1
Do While I < 20
X = Val(Form1.MSFlexGrid1.TextMatrix(I, 1))
Y = Val(Form1.MSFlexGrid1.TextMatrix(I, 2))
X1 = Val(Form1.MSFlexGrid1.TextMatrix(I + 1, 1))
Y1 = Val(Form1.MSFlexGrid1.TextMatrix(I + 1, 2))
Picture1.Line (X, Y)-(X1, Y1)
I = I + 1
Loop
End Sub

Answer 2

VB 中有两种基本方法：1 在 PictureBox 中用 Line 方法逐点(x, y) 画线。需要自己计算缩放比。
2 使用 MSChart 控件，选折线图，将数组数据赋给它的 ChartData 属性，它会自动处理。

Answer 3

1 在 PictureBox 中用 Line 方法逐点(x, y) 画线。需要自己计算缩放比。
2 使用 MSChart 控件，选折线图，将数组数据赋给它的 ChartData 属性，它会自动处理。