分隔符来读取文本、
- 作者: 1986年7月29号的梦魇
- 来源: 51数据库
- 2022-08-17
'读取文件
If My.Computer.FileSystem.FileExists(shuju) Then
Dim neirong As Microsoft.VisualBasic.FileIO.TextFieldParser
neirong = My.Computer.FileSystem.OpenTextFieldParser(shuju)
neirong.SetDelimiters(",")
Dim textFields As String() = neirong.ReadFields()
For Each currentField As String In textFields
ListBox1.Items.Add(currentField)
Next
neirong.Close()
Else
MsgBox("文件不存在")
End If
推荐阅读
