我有一个程序,我可以在文本框中输入名称和整数值,然后将它们保存到文件中。这完全没问题,但我需要帮助的部分是阅读文件。
数据与csv文件非常相似地保存在文件中。例如:
FBSDKShareDialogModeNative
我的问题是,如何在表单上的多个文本框中阅读? 名称(每行的第一个值)应该进入相应的名称文本框(即txtName0,txtName1,txtName2等),整数值也应该进入相应的文本框(txtCut1,txtColour1等)。
我花了两个多小时试图解决这个问题,但我只是不能。
我需要帮助的部分是最后一种方法。
Test, 5, 5, 5
dadea, 5, 5, 5
das, 5, 5, 5
asd, 5, 5, 5
dsadasd, 5, 5, 5
答案 0 :(得分:1)
尝试这种方法。
Dim mindex as integer
Dim string1 as string()
Dim OpenFile As StreamReader = File.OpenText(fileName)
While OpenFile .Peek <> -1
string1= OpenFile .ReadLine.Split(",")
If mindex = 0 Then
txtname1.text=string1(0)
txtcut1.text=string1(1)
txtcolour1.text=string1(2)
'add other textboxes
ElseIf mindex = 1 Then
txtname2.text=string1(0)
txtcut2.text=string1(1)
txtcolour2.text=string1(2)
'add other textboxes
ElseIf mindex = 2 Then
txtname3.text=string1(0)
txtcut3.text=string1(1)
txtcolour3.text=string1(2)
'add other textboxes
ElseIf mindex = 3 Then
'your code
ElseIf mindex = 4 Then
'your code
End If
mindex += 1
End While
OpenFile .Close()
希望这会有所帮助。