[3booody]

أخي سبب هذا الخطأ هو ماممكن تضع قيمة للمتغير وهوا داخل اطار الفئة مباشرة والسبب يتم حفظ القيمة في الذاكرة قبل لحظة انشاء تكست بوكس وقيمته
لكن ممكن  تعطيها قيمة مثل

كود :

Dim aa As Integer = 2

وتغير القيمة حسب الحدث الذي لديك

الكود الذي اعطيتك هو يؤدي غرضك  لاحظ الكود التالي

كود :

Dim ss As Integer = 0
   Dim aa As Integer = 0
   ' Dim ss As Integer = TextBox1.Text'غير ممكن
   Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
       ' ss = TextBox1.Text 'ممكن
       ' aa = TextBox2.Text 'ممكن
       ProgressBar1.Increment(aa)
       If ProgressBar1.Value = ss Then
           MsgBox("ok")
       End If
       Label1.Text = ProgressBar1.Value

   End Sub

   Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
       Timer1.Start()

   End Sub

   Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
       ss = TextBox1.Text 'ممكن
   End Sub

   Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
       aa = TextBox2.Text 'ممكن
   End Sub