[vb_net]

السلام عليكم ورحمة الله

الكود

PHP كود :

Try

            ' متغير الدي سياخد قيم الحرف او الرمز او رقم مدخل من نوع حرفي
            Dim c As Char = TextBox1.Text
            ' متغير الدي سيضهر الرقم الخاص باي زر
            Dim s As Integer = Asc(TextBox1.Text)

            ' اضهار الرقم في ليبل
            Label1.Text = s
        Catch ex As Exception

        End Try 


صورة للبرنامج