Imports System Public Class SamplesArray Public Shared Sub Main() ' Creates and initializes a one-dimensional array. Dim myArr1(4) As [String] myArr1.SetValue("three", 3) Console.WriteLine("[3]: {0}", myArr1.GetValue(3)) End Sub 'Main End Class 'SamplesArray