D
Dirk Schwidde
hi,
I'd like to have subforms to popup when I hover over "hot spots"
of the main form. The subforms should close automatically after a
small period of time.
Now, this is the concept so far:
in the main form:
Private Sub image_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
subform.Show vbModeless
End Sub
in the subform:
Private Sub UserForm_Activate()
Application.Wait Now + TimeSerial(0, 0, 1)
Unload Me
End Sub
It works, but if I move the mouse between those "hot spots" too fast,
the programm crashes giving the message
"method wait for object _application failed"
Wthat's the problem and how can I solve it?
Is there a way to let the subforms close when the mouse pointer
is no longer over the appropriate hot spot?
Regards
Dirk
I'd like to have subforms to popup when I hover over "hot spots"
of the main form. The subforms should close automatically after a
small period of time.
Now, this is the concept so far:
in the main form:
Private Sub image_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
subform.Show vbModeless
End Sub
in the subform:
Private Sub UserForm_Activate()
Application.Wait Now + TimeSerial(0, 0, 1)
Unload Me
End Sub
It works, but if I move the mouse between those "hot spots" too fast,
the programm crashes giving the message
"method wait for object _application failed"
Wthat's the problem and how can I solve it?
Is there a way to let the subforms close when the mouse pointer
is no longer over the appropriate hot spot?
Regards
Dirk