Article ID: 150210
Article Last Modified on 7/16/2004
APPLIES TO
- Microsoft Visual Basic 4.0 Standard Edition
- Microsoft Visual Basic 4.0 Professional Edition
- Microsoft Visual Basic 4.0 Professional Edition
- Microsoft Visual Basic 4.0 16-bit Enterprise Edition
- Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
This article was previously published under Q150210
SUMMARY
If a DBCombo control is placed on a form that is shown modally, then the user is unable to click a selection of the drop-down list. This behavior only occurs in an EXE file, it does not occur in the Design Environment of Visual Basic.
WORKAROUND
To work around this problem, the function below can be used to simulate showing a form modally. The workaround allows the DBCombo control to be used.
Instead of showing a form modally, show the form using a method such as the one documented below. For example, to simulate invoking Form1 modally, call the method as shown below:
ShowModalForm Form1
The subroutine ShowModalForm is shown below, and can be placed in a Form or standard code module:
Public Sub ShowModalForm(frmTarget As Form)
Dim ofrm As Object
'Disable all the forms
For Each ofrm In Forms
ofrm.Enabled = False
Next ofrm
'Now show the target form non-modal
frmTarget.Show
'If the frmTarget was disabled by the loop above
'make sure it is now enabled
frmTarget.Enabled = True
'Sit in a loop until the target form is dismissed
Do While frmTarget.Visible = True
DoEvents
Loop
'We have left the loop, so the dialog has been dismissed
'Now Enable the forms, and exit the procedure
For Each ofrm In Forms
ofrm.Enabled = True
Next ofrm
End Sub
STATUS
Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. This bug has been fixed in Visual Basic 6.0.
MORE INFORMATION
Steps To Reproduce the Problem
- Start a new project in Visual Basic. Form1 is created by default.
- Insert a new form into the project by choosing Insert...Form.
- On the new Form (Form2), place a Data control and a DBCombo control.
- Set the Databasename property of the Data control to Biblio.mdb, found in the vb directory. Set the Recordsource property to Authors.
- Set the RowSource property of the DBCombo control to Data1, and the ListField property of the DBCombo control to Author.
In the Click event for Form1, place the following code to invoke Form2 modally:
Form2.Show vbModal- Compile an EXE by choosing File...Make EXE from the menu.
- Using File Manager, or Windows Explorer invoke the EXE for the project.
- Click Form1 so that Form2 is shown. Choose the drop-down list for the DBCombo control, and note that a selection of the list cannot be made.
To work around this problem above using the workaround, the ShowModalForm routine can be placed into the project and the line of code in the Click event of Form1 can be changed to:
ShowModalForm Form2
Additional query words: kbVBp400bug kbVBp600fix kbVBp kbdsd kbDSupport kbNoKeyWord
Keywords: kbbug kbfix kbvbp600fix KB150210
