MSDN中的示例文件怎么用？比如如下

怎么在程序中试一下这个示例啊？谢谢了啊Imports System
Imports Microsoft.VisualBasicPublic Class SamplesArray    
    
    Public Shared Sub Main()
        
        Dim myArray As Array = Array.CreateInstance(GetType(String), 12)
        myArray.SetValue("the", 0)
        myArray.SetValue("quick", 1)
        myArray.SetValue("brown", 2)
        myArray.SetValue("fox", 3)
        myArray.SetValue("jumps", 4)
        myArray.SetValue("over", 5)
        myArray.SetValue("the", 6)
        myArray.SetValue("lazy", 7)
        myArray.SetValue("dog", 8)
        myArray.SetValue("in", 9)
        myArray.SetValue("the", 10)
        myArray.SetValue("barn", 11)
               Console.WriteLine("The Array contains the following values:")
        PrintIndexAndValues(myArray)
        
        Dim myString As String = "the"
        Dim myIndex As Integer = Array.IndexOf(myArray, myString)
        Console.WriteLine("The first occurrence of ""{0}"" is at index {1}.", _
           myString, myIndex)
        
               myIndex = Array.IndexOf(myArray, myString, 4)
        Console.WriteLine("The first occurrence of ""{0}"" between index 4 " _
           + "and the end is at index {1}.", myString, myIndex)
        
                myIndex = Array.IndexOf(myArray, myString, 6, 5)
        Console.WriteLine("The first occurrence of ""{0}"" between index 6 " _
           + "and index 10 is at index {1}.", myString, myIndex)
    End Sub
    
    
    Public Shared Sub PrintIndexAndValues(myArray As Array)
        Dim i As Integer
        For i = myArray.GetLowerBound(0) To myArray.GetUpperBound(0)
            Console.WriteLine(ControlChars.Tab + "[{0}]:" + ControlChars.Tab _
               + "{1}", i, myArray.GetValue(i))
        Next i
    End Sub
End Class