Keypress-Event

Hallo,

ich habe eine Consolen-App, die eine Hauptschleife hat. In dieser soll, ohne da das laufende Programm unterbrochen wird, auf Tastendruck in der Console reagiert werden. Dazu habe ich mir die MBS-Plugins zugelegt und habe das damit unter Linux damit lsen knnen:

Dim lh As New StdinMBS
dim c as Integer

' Hauptschleife, wird fortlaufend ausgefhrt
Do
   ' Prfen, ob Taste gedrckt
   If lh.IsReady = True Then
      c = lh.GetCharacter
      If c = 113 Then
         ' Hier Verarbeitung, wenn Taste Q gedrckt wurde
      End If
   ' Haupt-Jobs erledigen

   ' Anderen Prozessen Zeit geben
   DoEvents(10)
Loop

Unter Windows kann man aber die Property IsReady nicht nutzen. Ich habe es dann mit StdinMBS.Read(1) probiert, was aber dazu fhrt, da das Programm auf Tastendruck wartet und somit die Schleife nicht weiter ausfhrt (also das Programm “hngt”). Auch mit WindowsConsoleMBS habe ich keine Lsung gefunden. Htte da jemand vielleicht einmal ein Code-Beispiel?