منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

--------------------------------------------

تفضل
Dim r As Integer = TextBox1.Text - TextBox2.Text
MsgBox(If(r < 0, 0, r))