12-02-18, 01:56 AM
السلام عليكم
يعطيكم العافيه
ابي اركب كود وما ضبط معي
RadioButton1 و RadioButton2
بالنسبة RadioButton1 تمام
وبالنسبة RadioButton2 احتاج انفذ شرط اذا textbox1 اقل من textbox2 يعطي رسالة لا يسمح الرصيد
او ينفذ المحاسبة
يعطيكم العافيه
ابي اركب كود وما ضبط معي
RadioButton1 و RadioButton2
بالنسبة RadioButton1 تمام
وبالنسبة RadioButton2 احتاج انفذ شرط اذا textbox1 اقل من textbox2 يعطي رسالة لا يسمح الرصيد
او ينفذ المحاسبة
كود :
If RadioButton1.Checked = True Then
RadioButton2.Enabled = False
Amount_remainigTextBox.Text = Val(Amount_remainigTextBox.Text) - Val(Discount_amountTextBox.Text)
MsgBox("تم تسجيل التنازل")
Exit Sub
End If
If RadioButton2.Checked = True Then
RadioButton1.Enabled = False
ElseIf textbox1.Text = Val(textbox1.Text) < Val(textbox2.Text) Then
MsgBox("مبلغ الخصم أعلى من المبلغ المتوفر")
Else
MsgBox("ok")
(textbox1.Text = Val(textbox1.Text) - Val(textbox2.Text)
MsgBox("تم التحويل")
End If