19 lines
419 B
Text
19 lines
419 B
Text
Public Sub Main()
|
|
Dim sFixedArray As String[] = ["Rosetta", "code", "is", "a", "programming", "chrestomathy", "site"]
|
|
Dim sFixedArray1 As New String[10]
|
|
Dim iDynamicArray As New Integer[]
|
|
Dim siCount As Short
|
|
|
|
For siCount = 1 To 10
|
|
iDynamicArray.Add(siCount)
|
|
Next
|
|
|
|
sFixedArray1[5] = "Hello"
|
|
sFixedArray1[6] = " world!"
|
|
|
|
Print sFixedArray.Join(" ")
|
|
Print iDynamicArray[5]
|
|
|
|
Print sFixedArray1[5] & sFixedArray1[6]
|
|
|
|
End
|