[explorer2]

اخي سعود
اشكرك على اجابتك
ونطمع بالمزيد من علمك

النموذجين يوجد بهما اثنان تكست بوكس
والمطلوب هو
عند ادخال رقم تكون النتيجه في الفورم الثاني نفس الرقم الموجود في الفورم الاول زائد واحد
على ان تكون الارقام من 00 الى 99 ومن ثم الرجوع الى 00 وليس 100

مثلا اذا كان 00 فتكون 01 واذا كانت 99 تكون النتيجه في الفورم الثاني 00
و 09 تكون 10 و 90 تكون91 وهكذا


استخدمت التالي
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x As Integer
Dim r As Integer
x = TextBox1.Text
r = TextBox2.Text
If Me.TextBox1.Text = x Then Form2.TextBox1.Text = x
If Me.TextBox2.Text = r Then Form2.TextBox2.Text = r + 1
If Me.TextBox1.Text = 9 Then Form2.TextBox1.Text = 0
If Me.TextBox2.Text = 9 Then Form2.TextBox2.Text = 0
Form2.Show()
End Sub