Code question

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I am working on a database in which I will have different data types. What I
want to be able to do is if, for example, the field [datatype] equals 1 it
would display a text box on the form, if 2 a combo box, if 3 a list box, etc.
Any suggestions?
 
I have written some code on controls before, but my problem is that I am not
sure how to do something of this nature, or even if it would be possible.

Arvin Meyer said:
In order to create controls in code, you must either open a form in Design
View, or have the controls in place and expose them at runtime.
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access downloads
http://www.datastrat.com
http://www.mvps.org/access

Steve Voorhees said:
I am working on a database in which I will have different data types. What I
want to be able to do is if, for example, the field [datatype] equals 1 it
would display a text box on the form, if 2 a combo box, if 3 a list box, etc.
Any suggestions?
Click to expand...
Click to expand...
 
You can create controls using the CreateControl method of the Form object,
but as Arvin says, you have to open the form in design view to do that. It's
generally better to create the controls in advance, and just toggle their
Visible property at run time. For example ...

Private Sub Form_Open(Cancel As Integer)

Dim FieldType As Long

FieldType = Me.Recordset.Fields(0).Type
Select Case FieldType
Case dbLong
Me.Text28.Visible = True
Me.Combo30.Visible = False
Me.List32.Visible = False
Case Else
Me.Text28.Visible = False
Me.Combo30.Visible = True
Me.List32.Visible = True
End Select

End Sub

--
Brendan Reynolds

Steve Voorhees said:
I have written some code on controls before, but my problem is that I am
not
sure how to do something of this nature, or even if it would be possible.

Arvin Meyer said:
In order to create controls in code, you must either open a form in
Design
View, or have the controls in place and expose them at runtime.
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access downloads
http://www.datastrat.com
http://www.mvps.org/access

message
I am working on a database in which I will have different data types. What I
want to be able to do is if, for example, the field [datatype] equals 1
it
would display a text box on the form, if 2 a combo box, if 3 a list
box, etc.
Any suggestions?
Click to expand...
Click to expand...
Click to expand...
 
Back
Top