vb截取本地txt中某两个指定字符之间的字符串

Question

我有一个文本：数据.txt
内容是：
张三，男，100，99，95
李四，男，84，100，98
王某人，女，0，20，58
现在我想截取第二排的内容，并将5个数据分别记录到Text1到Text5的文本框中。望高手解答！！！谢谢。。。

Answer 1

Dim s() As String, s1() As String
Open "数据.txt" For Binary As #1
s = Split(Input(LOF(1), #1))
Close #1
s1 = Split(s(1), "，") '第一行为s(0)，第二行为s(1)，依此类推
Text1.Text = s1(0)
Text2.Text = s1(1)
Text3.Text = s1(2)
Text4.Text = s1(3)
Text5.Text = s1(4)