سلام
من یک user control طراحی کردم که شامل سه تا رادیو باتن هست و برای هر کدام از این رادیوها کدهای زیر را نوشتم :
Private Sub rdb1_CheckedChanged(sender As Object, e As EventArgs) Handles rdb1.CheckedChanged
If rdb1.Checked Then
Form1.txtpay_night.Text = Val(Form1.txtpay_night.Text) + 560000
Else
Form1.txtpay_night.Text = Val(Form1.txtpay_night.Text) - 560000
End If
End Sub
Private Sub rdb2_CheckedChanged(sender As Object, e As EventArgs) Handles rdb2.CheckedChanged
If rdb2.Checked Then
Form1.txtpay_night.Text = Val(Form1.txtpay_night.Text) + 742000
Else
Form1.txtpay_night.Text = Val(Form1.txtpay_night.Text) - 742000
End If
End Sub
Private Sub rdb3_CheckedChanged(sender As Object, e As EventArgs) Handles rdb3.CheckedChanged
If rdb3.Checked Then
Form1.txtpay_night.Text = Val(Form1.txtpay_night.Text) + 954000
Else
Form1.txtpay_night.Text = Val(Form1.txtpay_night.Text) - 954000
End If
End Sub
یعنی با این کدها می خوام هر کدوم از رادیو ها که فعال بودن یک عدد خاصی را با تکس باکس (txtpay_night) جمع کند.
حالا مشکل اینجاست که هر بار تکس باکس را خالی می کند و فقط همان عدد آخر را جمع می کند.
مثلا من اگر سه تا رادیو 1 و 2 و 3 را فعال کنم به جای اینکه 560000+742000+954000 کند و جمع را بنویسد فقط عد آخر یعنی 954000 را می نویسد ؟؟؟؟؟؟؟؟؟
پاسخ با نقل قول