Hello. Can you help me please
Public Class qqq
Public xxx as string
End Class
'This block form1
Public Class main
Public aaa() as qqq
Public Sub www()
redim aaa(3)
Dim bbb as qqq = new qqq
bbb=qqq(1)
ccc=bbb.xxx 'Error Line
end sub
end class
Thanks.
Public Class qqq
Public xxx as string
End Class
'This block form1
Public Class main
Public aaa() as qqq
Public Sub www()
redim aaa(3)
Dim bbb as qqq = new qqq
bbb=qqq(1)
ccc=bbb.xxx 'Error Line
end sub
end class
Thanks.