Imports System

Public Class Test
   Public Shared Sub Main() 
       Dim c As Char
       c = Console.ReadLine
       Do While c <> " "
           System.Console.WriteLine(Char.IsLetterOrDigit(c))
           c = Console.ReadLine
       Loop
   End Sub
End Class