does anyone know how to do this in a for loop in VB6
'txtHI6_Ln5(TabStrip1.SelectedItem.Index - 1).Visible = True
'txtHI6_Ln6(TabStrip1.SelectedItem.Index - 1).Visible = True
'txtHI6_Ln7(TabStrip1.SelectedItem.Index - 1).Visible = True
'txtHI6_Ln8(TabStrip1.SelectedItem.Index - 1).Visible = True
'txtHI6_Ln9(TabStrip1.SelectedItem.Index - 1).Visible = True
'txtHI6_Ln10(TabStrip1.SelectedItem.Index - 1).Visible = True
'txtHI6_Ln11(TabStrip1.SelectedItem.Index - 1).Visible = True
For i = 5 to 11
txtHI6_Ln"i"(TabStrip1.SelectedItem.Index - 1).Visible = True
...
next i?
Thanks , Marc :confused:
