HTML clipboard
Module
Module1
Sub Main()
Dim IntArray(9) As
Integer
Dim StrArray(99) As
String
Dim Bigarray(1) As
Object
Dim
i As
Integer
'populate array intArray
For i = 0 To 9
IntArray(i) = i
Next
'populate array StrArray
For i = 0 To 99
StrArray(i) =
"ITEM" & i.ToString("0000")
Next
Bigarray(0) = IntArray
Bigarray(1) = StrArray
Console.WriteLine(Bigarray(0)(7))
Console.WriteLine(Bigarray(1)(16))
End Sub
End
Module