vb如何读取txt数据并在picture box中画图

Question

有以下下这样的TXT文件，假设放到d盘的1.txt文本中
0.0010, 2432.20
0.0020, 3171.44
0.0030, 2673.11
0.0040, 3205.86
0.0050, 3394.31
数据很多，以上就写了几个，那么如何提取第一列的数值作为横坐标，第二列作为纵坐标，并在picture box中画图，谢谢

Answer 1

你自己把我下面显示出来的位置，代换一下画图就行了。

Private Sub Command1_Click()
    Dim i As Long
    Open "c:\123.txt" For Input As #1 '读取c:\123.txt
    arr = Split(StrConv(InputB(LOF(1), 1), vbUnicode), vbNewLine)
    Close #1
    For i = 0 To UBound(arr)
    If InStr(arr(i), ",") <> 0 Then
       Print "X:" & Trim(Split(arr(i), ",")(0)) & " Y:" & Trim(Split(arr(i), ",")(1)) 'x和y位置
    End If
    Next
End Sub

 

Answer 2

颜色呢，坐标怎么是小数点的?追问

第一列是时间，第二列是结果，现在知道怎么赋值了，但是还不会画图