Imports System Module IsDigitSample Sub Main() Dim ch8 As Char ch8 = "8"c Console.WriteLine(Char.IsDigit(ch8)) Console.WriteLine(Char.IsDigit("sample string", 6)) End Sub End Module