PDA

View Full Version : سوال: جمع مقدار تکست باکس ها



azbddk
دوشنبه 06 خرداد 1392, 10:21 صبح
چگونه می تونم اعداد 4 تکست باکس رو باهم جمع کنم و جواب جمعو تو تکست باکس پنجم بنویسم؟

abbasrahmati
دوشنبه 06 خرداد 1392, 10:52 صبح
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i1, i2, i3, i4 As Integer
i1 = Me.TextBox1.Text
i2 = Me.TextBox2.Text
i3 = Me.TextBox3.Text
i4 = Me.textbox4.text
Me.TextBox5.Text = Val(i1 + i2 + i3 + i4)
End Sub