يبدو انك ادخلت المتغير داخل حدث النقر
أخرج هذا المتغير من حديث النقر .... وجعله في قسم التصريحات العامة
----------------
ليكون في النهاية بهذا الشكل
'متغير في قسم التصريحات العامة
تم التعديل جربة الآن
إقتباس :Dim i As Integer = -1
أخرج هذا المتغير من حديث النقر .... وجعله في قسم التصريحات العامة
----------------
ليكون في النهاية بهذا الشكل
'متغير في قسم التصريحات العامة
كود :
Dim i As Integer = -1
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'التالي
If i = TextBox2.Lines.Count - 1 Then i = -1
i += 1
TextBox1.Text = TextBox2.Lines(i)
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
'السابق
If i <= 0 Then i = TextBox2.Lines.Count
i -= 1
TextBox1.Text = TextBox2.Lines(i)
End Subتم التعديل جربة الآن
