Contact: aviboots(AT)netvision.net.il
39,928 questions
51,861 answers
573 users
Imports System Public Class Test Public Shared Sub Main() Dim ch As Char = "a" Console.WriteLine(Convert.ToString(Convert.toInt32(ch), 16).PadLeft(4, "0"C)) End Sub End Class 'run: '0061