Question

vb如何读取文本一行的三个数字赋值给变量

例如文本上
1,2,3
1,2,4
4,32,2
等等
然后分别赋值给
a,b,c
我可以用timer控件进行分时间操作，但是如何读取呢？
文本就放在exe文件根目录，名字随机，需要用一个变量储存名字，可以读取不同的文本（设文本名字变量已存储名字了）
我菜鸟，请解释详细点
我要求全过程啊，包括打开文本到变量赋值

Answer 1

Private Sub Command1_Click()

If Dir(App.Path & "\" & Text2.Text) = "" Then

  MsgBox ("输入文件不存在")

  Else

  Open App.Path & "\" & Text2.Text For Input As 1

  Command2.Enabled = True

  End If

 Command1.Enabled = False

End Sub

Private Sub Command2_Click()

 Dim a As Integer, b As Integer, c As Integer

  If EOF(1) = False Then

  

 Input #1, a, b, c

 

Print "a=" & a & "b=" & b & "c=" & c

Else

Close #1

Command2.Enabled = False

Command1.Enabled = True

End If

End Sub

Private Sub Form_Load()

Command2.Enabled = False

End Sub

Answer 2

遇到逗号变赋值给另一个变量
变量用Val函数转换给变量