Pause im Programm?

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Marcus Gräfe.

    Nein, sowas gibt es nicht, das muss man sich selbst schreiben. Hier mal ein Beispiel:

    <pre><FONT SIZE=1 FACE=Courier New><FONT COLOR=#000080>Option</FONT> <FONT COLOR=#000080>Explicit</FONT>

    <FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Declare</FONT> <FONT COLOR=#000080>Function</FONT> GetTickCount <FONT COLOR=#000080>Lib</FONT> "kernel32" () <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>
    <FONT COLOR=#808080><HR></FONT>

    <FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Sub</FONT> Command1_Click()
    <FONT COLOR=#000080>Dim</FONT> x <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>

    x = GetTickCount
    <FONT COLOR=#000080>While</FONT> x + 10000 > GetTickCount
    DoEvents
    Wend
    MsgBox "fertisch"
    <FONT COLOR=#000080>End</FONT> <FONT COLOR=#000080>Sub</FONT>

    </FONT></pre>
    Besucht auch mein anderes Forum:
    Das Amateurfilm-Forum