FlatEdit Validate Event Crashes VB6

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Try this:

1) Start a new Standard EXE project and add a UserControl
2) Draw a FlatEdit control on the UserControl (FlatEdit1)
3) Add this code to the UserControl:

Option Explicit

Public Event Validate(ByRef Cancel As Boolean)

Private Sub FlatEdit1_Validate(Cancel As Boolean)
    RaiseEvent Validate(Cancel)
End Sub

4) Draw 2 instances of the newly created UserControl1 on the form and run the project.
5) Press TAB a couple of times. If VB6 doesn't crash, close the form and go back to the UserControl designer.
6) Change the Appearance property to xtpAppearanceOffice2007 then re-run the project and Press TAB and it should crash the IDE.

This is in VB6 on Vista SP1.