
DB Combo doesn't fire Change event?
I'm trying to use a DBCombo box that will change the Bound Text each time
I change the List Field (the default setting for the DBCombo).
However, I should expect that if I select a different item from the combo
box
the Change SHOULD fire but it never does! WHY NOT! As a work around, I
had to put my code in the MouseUp event and do it that way... (which does
work).
This is inefficient though, because this will trigger an event each time the
list is clicked on...too many changes are done to the other Data Controls
then!
How does the DBCombo box work? and Why doesn't it ever show me a Message
box with "Hello World"?
------>
Private Sub dbcFirmType_Change()
MsgBox ("Hello World")
End Sub
Private Sub dbcFirmType_MouseUp(Button As Integer, Shift As Integer, x As
Single, y As Single)
If (dbcFirmType.BoundText <> "") Then
dtaFirm.RecordSource = "SELECT [FirmName], [FirmID] FROM tblFirm
WHERE FirmTypeID = " & dbcFirmType.BoundText & " ORDER BY [FirmName]"
dtaFirm.Refresh
dbcFirm.Refresh
End If
End Sub
Dante
please respond through email.
Thanks.