VB程序中实现暂停功能的代码