Detect Object Index

[WhiteRavenEye]

How can I detect if object with specific index exists?
E.g. I load text box and give it random index number between 0 and 5.
Now I have to set some text in textbox so I need to detect it but I
don't know what index I gave it!

Private Sub Form_Load()
Dim x As Integer
x = Rnd * 5
Load Text1(x)
End Sub

And I need to find out that x!
How can I do that?

By WhiteRavenEye <aka ColdFusion>

[River]

on your form click on your text box then look at your properties it will
tell you the name of the object selected.
"WhiteRavenEye" <wh***********@hotmail.com> wrote in message
news:be**********@brown.net4u.hr...

How can I detect if object with specific index exists?
E.g. I load text box and give it random index number between 0 and 5.
Now I have to set some text in textbox so I need to detect it but I
don't know what index I gave it!

Private Sub Form_Load()
Dim x As Integer
x = Rnd * 5
Load Text1(x)
End Sub

And I need to find out that x!
How can I do that?

By WhiteRavenEye <aka ColdFusion>

[Roger Barker]

In article <be**********@brown.net4u.hr>, WhiteRavenEye
<wh***********@hotmail.com> writes

How can I detect if object with specific index exists?
E.g. I load text box and give it random index number between 0 and 5.
Now I have to set some text in textbox so I need to detect it but I
don't know what index I gave it!

Private Sub Form_Load()
Dim x As Integer
x = Rnd * 5
Load Text1(x)
End Sub

And I need to find out that x!
How can I do that?

Something like this?

Dim ctlT As Control

For Each ctlT In Controls
If TypeOf ctlT Is TextBox And ctlT.Name = "Text1" Then _
Debug.Print ctlT.Index
Next ctlT
--
Roger Barker ro***@peaksys.co.uk
Boston, UK

[WhiteRavenEye]

Roger Barker wrote:

In article <be**********@brown.net4u.hr>, WhiteRavenEye
<wh***********@hotmail.com> writes

How can I detect if object with specific index exists?
E.g. I load text box and give it random index number between 0 and 5.
Now I have to set some text in textbox so I need to detect it but I
don't know what index I gave it!

Private Sub Form_Load()
Dim x As Integer
x = Rnd * 5
Load Text1(x)
End Sub

And I need to find out that x!
How can I do that?

Something like this?

Dim ctlT As Control

For Each ctlT In Controls
If TypeOf ctlT Is TextBox And ctlT.Name = "Text1" Then _
Debug.Print ctlT.Index
Next ctlT

Yes, yes, yes!!!!
That's exactly what I needed!
Thanks... You saved me a lot of headache...

By WhiteRavenEye <aka SysCold>

[Samir Talwar]

That's what I would have thought as well. Obviously some people chose
to ignore the simple stuff and go with the complicated - I suppose you
can make your program look more nerdy like that.
Samir Talwar

da***********@hotmail.com (David Wimbush) wrote in message news:<3c**************************@posting.google. com>...

Surely Don's suggestion of making a note of x in the first place is much better?

WhiteRavenEye <wh***********@hotmail.com> wrote in message news:<be**********@brown.net4u.hr>...

Roger Barker wrote:

In article <be**********@brown.net4u.hr>, WhiteRavenEye
<wh***********@hotmail.com> writes

>How can I detect if object with specific index exists?
>E.g. I load text box and give it random index number between 0 and 5.
>Now I have to set some text in textbox so I need to detect it but I
>don't know what index I gave it!
>
>Private Sub Form_Load()
>Dim x As Integer
>x = Rnd * 5
>Load Text1(x)
>End Sub
>
>And I need to find out that x!
>How can I do that?
Something like this?

Dim ctlT As Control

For Each ctlT In Controls
If TypeOf ctlT Is TextBox And ctlT.Name = "Text1" Then _
Debug.Print ctlT.Index
Next ctlT

Yes, yes, yes!!!!
That's exactly what I needed!
Thanks... You saved me a lot of headache...

By WhiteRavenEye <aka SysCold>