With the form shown here, if I move the mouse pointer quickly from top to bottom over these text boxes, the interpreter crashes and sends a bug report to Apple.
The underlying code is:
Private Sub CurrentPAL_OnEnter()
if CurrentPAL.value <> "" then
ShowItem.Caption = CurrentPAL.value & " "
ShowItem.Visible = true
end if
End Sub
Private Sub CurrentPAL_OnExit()
ShowItem.Visible = false
End Sub
Private Sub PreviousPAL_OnEnter()
if PreviousPAL.value <> "" then
ShowItem.Caption = PreviousPAL.value & " "
ShowItem.Visible = true
end if
End Sub
Private Sub PreviousPAL_OnExit()
ShowItem.Visible = false
End Sub
Private Sub PreviousBAL_OnEnter()
if PreviousBAL.value <> "" then
ShowItem.Caption = PreviousBAL.value & " "
ShowItem.Visible = true
end if
End Sub
Private Sub PreviousBAL_OnExit()
ShowItem.Visible = false
End Sub
. . . . etc.
If the mouse is dragged slowly over the text boxes, allowing ShowItem to be visible and invisible cleanly, the error doesn't happen.