Get the length of strings

Module Module1

Sub Main()

Dim username As String
Console.WriteLine("Your name: ")
username = Console.ReadLine
If username.Length = "10" Then
Console.WriteLine("Your username has length of ten characters!!!!! ")

Else
Console.WriteLine("Your username is not ten characters!")
End If


Console.ReadLine()

End Sub

End Module