vb6: interrupt endless msgbox loop

Question

I am writing a program in VB6.

By mistake many times my code contains an endless loop, inside which there is a message box. For example:

while a>0
    msgbox "a is positive"
wend

Then I press the play/run and I realize what has happened. Is there any way to stop the debugging/running of my program?

The only thing that works so far is Ctrl+Alt+Del and end task. But this way the whole visual basic closes and I lose my unsaved data. (please don't comment that I should save my program more often. I know it (now)).

Edit: I found on the internet that maybe esc or ctrl+c or ctrl+break could do the job. The first two do nothing and my laptop doesn't have a break key

Solution: I have the insert key in my laptop. on the key there is also written pause for use along with the Fn key. So I was able to break the application by pressing Ctrl+Fn+Insert (which maybe could be translated in Ctrl+Pause)

edit: link to photo of my keyboard:

Answer 1

ctrl + break will work. If you don't have those keys, use the on screen keyboard.

Start | Run | osk

Then press ctrl + break.