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