Contact: aviboots(AT)netvision.net.il
39,911 questions
51,843 answers
573 users
Imports System Public Module Module1 Public Sub Main() Dim ch As Char = "2"c Dim val As Integer = CInt(Char.GetNumericValue(ch)) Console.Write(val) End Sub End Module ' run ' ' 2 '