Imports System
Public Class Program
Public Shared Sub Main(ByVal args As String())
Dim s1 As String = "Madness - (My Name Is) Michael Caine"
Console.WriteLine(s1.Length)
Dim s2 As String = ""
Console.WriteLine(s2.Length)
Const s3 As String = "c# c vb.net"
Console.WriteLine(s3.Length)
Console.WriteLine("abc".Length)
End Sub
End Class
' run:
'
' 36
' 0
' 11
' 3
'