Hi i am trying to read an array but i get this error: The array bounds can not appear in type specifiers, i want to get the array data to make an object at line Dim user As Usuarios(line(0)).....
Try
Dim filePath As String
filePath = System.IO.Path.Combine(
My.Computer.FileSystem.SpecialDirectories.MyDocuments, "Clients.txt")
Dim fileReader As System.IO.StreamReader
fileReader = My.Computer.FileSystem.OpenTextFileReader(filePath)
While fileReader.EndOfStream <> True
Dim line As String = fileReader.ReadLine
Dim lineSplit As String() = line.Split("/")
Dim user As Usuarios(line(0))
ComboBox1.Items.Add(line)
MsgBox(line)
End While
Catch ex As Exception
MsgBox("Error, file not found Clientes.txt")
End Try
Current class
Public Class Usuarios
Private _nombre As String
Private _erApellido As String
Private _onApellido As String
Private _Dni As String
Private _movil As Integer
Private _direccion As String
'Private _fecha As Date
'Constructor
Public Sub New(ByVal Nombre As String, ByVal erApellido As String,
ByVal onApellido As String, ByVal Dni As String,
ByVal tel As Integer, ByVal direccion As String)
Me._nombre = Nombre
Me._erApellido = erApellido
Me._onApellido = onApellido
Me._Dni = Dni
Me._movil = tel
Me._direccion = direccion
'Me._fecha = fecha
End Sub
'Getters y Setters
Public Property Nombre() As String
Get
Return _nombre
End Get
Set(ByVal Value As String)
_nombre = Value
End Set
End Property
Public Property erApellido() As String
Get
Return _erApellido
End Get
Set(ByVal Value As String)
_erApellido = Value
End Set
End Property
Public Property onApellido() As String
Get
Return _onApellido
End Get
Set(ByVal Value As String)
_onApellido = Value
End Set
End Property
Public Property Dni() As String
Get
Return _Dni
End Get
Set(ByVal Value As String)
_Dni = Value
End Set
End Property
Public Property Movil() As Integer
Get
Return _movil
End Get
Set(ByVal Value As Integer)
_movil = Value
End Set
End Property
Public Overrides Function ToString() As String
Return String.Format(Me._Dni + "/" + Me._nombre + "/" + Me._erApellido + "/" + Me._onApellido + "/" + String.Format(Me._movil))
End Function
End Class
Current .txt format name/surname/.... my objective, split the information contained on .txt and make an user object saved on arraylist.