如何将运行的程序暂停？

Question

我最近做了个软件，想实现以下目的：当用户执行一个操作后，程序执行到某一步会跳出一个对话框让用户选择，只有用户选择后程序才能继续运行，对话框不是用系统自带的，请问如何实现让程序暂停啊？

Answer 1

intYN = MsgBox("该操作将暂停程序运行，确定吗？", 4 + 32, "") '6是 7否
if intYN=6 then
  '暂停代码，如：end
endif

Answer 2

使用模式窗体，如form1.show vbModel(form1.show 1),详细请参看MSDN

Answer 3

MSGBOX为什么是6是7否啊？
vb里面常量的定义,看msdn