VB Forum / General / July 2005

I'm not exactly following the layout you have on your form from the
description above (not sure which tabs the TextBox'es are on, what the
Active Tab has to do with the 3rd tab that I think you are on, and so
on). However, I'd like to point out the that Index value for the control
array is not a "global" value, so you cannot reference it from anywhere
other than an event associated with the control array (that is why it is
shown as an argument in the events for the control array controls; it is
no different than if you create a Sub and declare your own arguments....
they are local to your Sub only). The reason you see Index having a
value of 0 is because you do not use an Option Explicit statement on
your forms to alert you when you reference a variable you have not
Dim'med. In this situation, VB creates a variable for you, on the fly,
and sets its Type as Variant. Variants, when referenced as an Integer or
Long (as you are doing when you try to use it as an array index) it has
a default value of 0. I'm not sure how to tell you to proceed because,
as I said in the beginning, I'm not entirely sure what you are doing or
how your control array controls are related to your SSTab control.

Rick

First of all, click VB's Tools/Options menu and make sure the "Require
Variable Declaration" box is checked. That will make sure that you're not
creating a new variable out of "thin air" by accident. You can also clear
the "Auto Syntax Check" box. That will get rid of any syntax error related
message boxes and just leave the line red.

You can get the active tab with....

SomeInt = SSTab1.Tab 'returns the zero based tab number

Other than its container relationship, there is absolutely no relationship
between the controls on a tab and the tab control itself. That means that
the Tab control couldn't care less what the Index of a specific textbox is.
That means if you want to place text in a specific element of your control
array, the element's Index must be hard coded (or calculated in some
manner). Since hard coding "1" everywhere is nearly impossible to read
(especially a few weeks/months from now) I usually set up an Enum that
describes each element.

Something like......
'==========
Option Explicit

Private Enum BoxArray
  baPassword ' = 0
  baEmployeePW ' = 1
End Enum

Private Sub Command1_Click()
  txtPassword(baPassword).Text = "1234"
  txtPassword(baEmployeePW).Text = "5678"
End Sub
'==========