ACCESS FEED: [MS_AccessPros] creating controls in code

Jumat, 24 Februari 2012

[MS_AccessPros] creating controls in code

Hello Group;
I am trying to format a report that has an unknown number of textboxes to head an similarly unknown number of columns. So I am trying to use the "NEW" keyword to create textboxes on the fly.

Dim txtNB1() As TextBox

With rst1
If strNB1 <> !Symbol Then
If !strTrainDirection = "Northbound" And !strTrainClass = "1st" Then
strNB1 = !Symbol
NB1 = NB1 + 1
Set txtNB1(NB1) = New txtNB1
Me.txtNB1(NB1).Text = !Symbol
End If
End If
etc........

How do I get this to work? and assign values to the new textbox properties?

Walter Griffin