vb编程中如何设计暂停程序

窗体最顶帆液巧上加上

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

需要暂停的时态键候调用

sleep(1000)'1000表示暂停1秒 以此类埋源推

你要的是系统全局热键还是程序局部热键呢虚如运？

VB默认库中没有暂停功能，只有结束(end)，你要实现暂停功能需要调用其他函数结合你的程序来实现橡败，需要你作点补充才行，以下是程序窗口差梁内实现的热键功能：

private sub form_keydown(keycode as integer,shift as integer)

'将FORM窗口中的属性KEYpreview设为TRUE

If shift=4 and keycode=65 then 'alt+a

Msgbox("你按下了热键Alt+A") '这个是按下热键后发生的事件,你可以调用timer控件实现的暂停功能

end if

end sub

需要暂停的地方就按Form2.ShowVbModal。

就像C中的岁穗getch()函数一样，程序停止，然后按任意键程序继滚行续，要在程序运乎备卜行的时候，运行到某条的时候能停一下，然后按下任意键才继续，要在生成的EXE文件中能够停止。

---