hello
I have a combo box which displays all the available forms in my db.Now,i want to display ONLY SELECTED FORMS.How should i modify my code, pls help me.
Private Sub cmbForms_AfterUpdate()
Dim strForm As String
If Me.CmbForms <> "" Then
strForm = Me.Form.Name
DoCmd.OpenForm Me.CmbForms
DoCmd.Close acForm, strForm
End If
End sub
-------
The row source of the combo box has the following:
SELECT MSysObjects.Name FROM MSysObjects WHERE (((MSysObjects.Type)=-32768));
-----
I have a combo box which displays all the available forms in my db.Now,i want to display ONLY SELECTED FORMS.How should i modify my code, pls help me.
Private Sub cmbForms_AfterUpdate()
Dim strForm As String
If Me.CmbForms <> "" Then
strForm = Me.Form.Name
DoCmd.OpenForm Me.CmbForms
DoCmd.Close acForm, strForm
End If
End sub
-------
The row source of the combo box has the following:
SELECT MSysObjects.Name FROM MSysObjects WHERE (((MSysObjects.Type)=-32768));
-----
