[مبرمج بلا حدود]

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته 

الاخوة الاحبه الكرام 

حفظكم الله وزاردكم بسطه في العلم والمعرفة وفقكم الله 

لدي استفسار وهو تحديد شرط لاظهار عدد من التيكست بوكس من 1 الى 9 هذا سهل على الفورم حيث يكون الكود بالشكل التالي 

PHP كود :

[align=center]Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged[/align]
[align=center]        If ComboBox1.SelectedItem = 1 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = False[/align]
[align=center]            TextBox3.Visible = False[/align]
[align=center]            TextBox4.Visible = False[/align]
[align=center]            TextBox5.Visible = False[/align]
[align=center]            TextBox6.Visible = False[/align]
[align=center]            TextBox7.Visible = False[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 2 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = False[/align]
[align=center]            TextBox4.Visible = False[/align]
[align=center]            TextBox5.Visible = False[/align]
[align=center]            TextBox6.Visible = False[/align]
[align=center]            TextBox7.Visible = False[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 3 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = False[/align]
[align=center]            TextBox5.Visible = False[/align]
[align=center]            TextBox6.Visible = False[/align]
[align=center]            TextBox7.Visible = False[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 4 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = True[/align]
[align=center]            TextBox5.Visible = False[/align]
[align=center]            TextBox6.Visible = False[/align]
[align=center]            TextBox7.Visible = False[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 5 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = True[/align]
[align=center]            TextBox5.Visible = True[/align]
[align=center]            TextBox6.Visible = False[/align]
[align=center]            TextBox7.Visible = False[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 6 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = True[/align]
[align=center]            TextBox5.Visible = True[/align]
[align=center]            TextBox6.Visible = True[/align]
[align=center]            TextBox7.Visible = False[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 7 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = True[/align]
[align=center]            TextBox5.Visible = True[/align]
[align=center]            TextBox6.Visible = True[/align]
[align=center]            TextBox7.Visible = True[/align]
[align=center]            TextBox8.Visible = False[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 8 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = True[/align]
[align=center]            TextBox5.Visible = True[/align]
[align=center]            TextBox6.Visible = True[/align]
[align=center]            TextBox7.Visible = True[/align]
[align=center]            TextBox8.Visible = True[/align]
[align=center]            TextBox9.Visible = False[/align]
[align=center]        ElseIf ComboBox1.SelectedItem = 9 Then[/align]
[align=center]            TextBox1.Visible = True[/align]
[align=center]            TextBox2.Visible = True[/align]
[align=center]            TextBox3.Visible = True[/align]
[align=center]            TextBox4.Visible = True[/align]
[align=center]            TextBox5.Visible = True[/align]
[align=center]            TextBox6.Visible = True[/align]
[align=center]            TextBox7.Visible = True[/align]
[align=center]            TextBox8.Visible = True[/align]
[align=center]            TextBox9.Visible = True[/align]
[align=center]        End If[/align]
[align=center][/align]
[align=center]    End Sub[/align] 


لكن سؤالي هو على التقرير انا افكرت فيها اذهب الى خاصية التيكست ومن ثم الى Visible ومن ثم الى كتابة الكود Exp 

لكن لم ينجح معي 

السؤال هو الشرط على التقرير كيف سوف يصبح وهل يوضح الشرط في كل التيكست بوكس 9 ام فقط في التيكست بوكس التي يظهر فيها الرقم 

ملاحظة الرقم يظهر في التقرير في تيكست بوكس وعلى الفورم في كومبو بوكس

جزاكم الله خير 

حفظكم الله