VB Code:
'either
Dim A() As UserInfo
A(0)=New User()
A(0).UserName = "ME"
A(1)=New User()
A(1).UserName = "You"
'or
Dim A() As New UserInfo={New User(), New User(), New User()}
A(0).UserName = "ME"
A(1).UserName = "You"
VB Code:
Public Class UserInfo
Public UserName As String
Public Password As String
Public Premissions As String
Public FirstName As String
Public LastName As String
Public Comment As String
Public Sub New()
mybase.New()
End Sub
Public Sub New(username as string)
Me.UserName=username
End Sub
End Class
Dim A() As New UserInfo={New User("Me"), New User("You"), New User("Them")}