Setting Object Variable

[vbLeo]

Hello Guys,

I'm trying to dynamically create forms and add controls to them. I'm specifically having a problem with establishing a data source for my textbox. I am able to add a remote data control called dSlider that appears to function properly. The textbox txtID also properly positions itself as directed. But I can't dynamically get it to bind to my coded data controller as a dataSource. VB6 tells me that the "object variable or with block is not set." I've tried setting the object variable but really just don't know what I'm doing. Can someone get me out of this rut, please!!?

The pertinent programming is attached. I get hung up on txtID.dataSource = dSlider.
Thanks for any advice.

MainDbs = "C:\MyFiles\My Documents\V_Basic\Substation1.mdb"
Set dbs = DBEngine(0).OpenDatabase(MainDbs)
Set rs = dbs.OpenRecordset("General")

Set dSlider = gFormArray(NumForms).Controls.Add("VB.data", "dSlider", gFormArray(NumForms))
Set dSlider.Recordset = rs ' Set Data1.recordset

' Activate a textbox on the ArrayForm and bind it:
Set txtID = gFormArray(NumForms).Controls.Add("VB.TextBox", "Text1", gFormArray(NumForms))
With txtID
.Visible = True
.Top = 1440: .Height = 375: .Left = 1920: .Width = 1650
.Text = "Identification Number"
.DataField = Name
.DataSource = dSlider 'object variable or with block not set
End With

[Killer42]

From VB online help...

Note Two older controls, the Data control and RemoteData control, can be used as data sources, however you cannot set the DataSource property of another control or object to either of these controls at run time. For example, the following code will fail:

Set Text1.DataSource = Data1 ' Will fail! You can't set DataSource at
                             ' run time to an intrinsic Data control.

To use either the Data control or RemoteData control as a data source, you can set the DataSource property of bound controls at design time only.

[vbLeo]

Thanks, Kill42, for your very swift reply! Too bad it wasn't what I wanted to hear (however, it was what I needed to hear). I'll try some other design approach to get around not being able to dynamically bind to a data control. Thanks again for the helpful information.