Imports System
Public Class MainClass
Shared Sub Main()
'Declare variable
Dim strData As String
strData = "string value"
'Display the length of the string
System.Console.WriteLine(strData.Length & " character(s)")
End Sub
End Class