Accessing a control

[Guest]

Hi, I've created a number of textboxes using the following code.

For Count = 1 to 30
Set MyTBox = MyControl.Controls.Add("Forms.textbox.1")
With MyTBox
.Width = 150
.Height = 20
.Top = 20 * Count - 13
.Left = 2
.name = "TBox" & Count
.Visible = True
End With
Next

I now want to access say the fifth box (TBox5)

I have a string (BoxName) with the name of the box TBox5 or I could use an
integer variable to indicate that I want the fifth box, but how do I refer to
this box? I tried:

MyTBox.BoxName.value = ... but this does not work,
and I tried:
MyTBox(5).value = ... this too does not work. What am I missing?

Again, thanks for your help in advance!!!

 

[Guest]

Hi Wes,

As you are creating the TextBoxes on the fly, it's not so easy to address
them in your code. Here is one method you can use:

Dim Cont As Control
For Each Cont In myForm.Controls
If Cont.Name = "TBox5" Then
Cont.Value = "My Value"
End If
Next

I hope this helps,

Sean.

 

[Bob Phillips]

Just use

Me.Controls("TBox5").Text = ...

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)