[ALBRNS]

وعليكم السلام

جرب التالي

PHP كود :

Private Sub Command1_Click()
Dim A
A = Val(Text1.Text) - Val(Text2.Text)
Text3 = Abs(A)
End Sub 


بالتوفيق