Doevents Imported from the msvbvm60 library

[Jaafar Tribak]

I am borrowing the rtcDoEvents function from the vba runtime which , in theory, should be exactlly the same as DoEvents because vb/vba inherits from that dll .. however when I test the function like in the following Macro, the keyboard input gets blocked unless you doubleclick the cell to enter edit mode

Private Declare Function rtcDoEvents Lib "MSVBVM60" () As Long

Sub Macro()
    Do
        rtcDoEvents
    Loop
End Sub

The reason I want to use rtcDoEvents export from the vb runtime istead of just using DoEvents is because I need it in a small program in PowerBasic which doesn't support Doevents or similar functionality

Do you guys experience the same problem with the keyboard input or does this happens just in excel 2007 ?

 

[Jaafar Tribak]

Can anybody kindly confirm the keyboard input issue before I take this further ?

Regards.

 

[Jaafar Tribak]

Ok, problem solved .. I was importing the function from the wrong VB library

here is the code that works the same as DoEvents and without blocking the keyboard input

Private Declare Function rtcDoEvents Lib "[B]VBE6[/B]" () As Long

Sub Macro()
    Do
        rtcDoEvents
    Loop
End Sub