Data Type VB.Net Tutorial

Module Tester
   Sub Main()
      Dim strings As String()
      Dim output As String = ""
      Dim i As Integer
      Dim quotes As Char = ChrW(34)
      strings = New String() {"started", "starting", _
         "ended", "ending"}
      For i = 0 To strings.GetUpperBound(0)
         If strings(i).StartsWith("st") Then
            Console.WriteLine(" starts with st")
         End If
      Next
      For i = 0 To strings.GetUpperBound(0)
         If strings(i).EndsWith("ed") Then
            Console.WriteLine(" ends with ed" )
         End If
      Next
   End Sub ' Main
End Module
starts with st
starts with st
ends with ed