Imports System
Public Module Module1
Public Sub Main()
dim surname as string
console.writeline("What's your last name?")
surname= console.readline()
do while surname.length > 20 'when using a length check on VB, write ".length" after the variable name
console.writeline("surnames can't be that long")
loop
End Sub
End Module