Execution error on close

Hi,

I wrote a little VBA program to extract information from a block and
add it to a MySQL database. Everything works fine except when I call
my app with this line :

(vl-vbarun "module1.recolte")

and then click "Cancel" in my app which execute only one line of code :

Private Sub cancelButton_Click()
End
End Sub

I get this error in the command window of AutoCAD :

Command: Execution error

Anybody can help ?

 

never mind I found my bug, I was not closing my form the right way.

I replaced :
Private Sub cancelButton_Click()
End
End Sub

With :
Private Sub cancelButton_Click()
Unload UserForm1
End Sub