[mhraffat84]

يمكن كتابة نفس البرنامج ولكن بدلاً من messagebox نظهر الرسالة في نفس Label الإجابة ..

Dim X ,Y as single
Try
x=Me.TextBox1.text

Y=3+5

label1.text=Y
Catch
" label1.Text= " please insert numeric value
End try