十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
使用OpenProcess打开进程,然后用ToolhelpAPI的CreateToolhelp32Snapshot函数创建线程快照,然后用Thread32First和用Thread32Next枚举该进程的线程,对于枚举出来的该进程的每个线程结构中获取线程ID,用OpenThread打开线程,用SuspendThread挂起该线程。当该进程的所有线程被挂起,该进程就被挂起了,也就被暂停了。反之,想恢复该进程,只需用函数ResumeThread恢复该进程的所有线程即可。 以上的做法是因为win32子系统没有导出SuspendProcess函数,只能绕个弯实现,可在Native API,却有该函数,函数名为ZwSuspendProcess(也可能是SuspendProcess,我用手机写这个的,没电脑,没法查,反正有一个是对的,你可以用VS里的工具DEPEND查查看函数名),在ntdll.dll被导出,该函数可以在vb中使用,不过得自己写声明,他的声明和SuspendThread几乎是一样的,就是句柄是进程句柄而不是线程句柄而已,与之对于的是ZwResumeProcess(也可能是ResumeProcess)。
成都创新互联公司专注为客户提供全方位的互联网综合服务,包含不限于网站建设、成都网站制作、施秉网络推广、成都微信小程序、施秉网络营销、施秉企业策划、施秉品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;成都创新互联公司为所有大学生创业者提供施秉建站搭建服务,24小时服务热线:13518219792,官方网址:www.cdcxhl.com
详细查看了你的问题,完全不需要使用线程sleep的方法。
在这边,我要给你引入一个概念。就是Form窗体的两个方法。
Form.Show()和Form.ShowDialog()
第一个Show方法运行后,你的主程序还是会进行,你的代码还是会继续进行下去。此时,窗体还是弹出的。
第二个ShowDialog方法运行后,此时,弹出的一个窗体,你不将其关闭,那么,主程序就会一直等待这个窗体关闭后,才执行后面的代码。
所以,你只需要使用showdialog这个方法,即可达到你想要的结果。
那么,如何才能让弹出的窗体不改变呢?很简单
你可以找到窗体的formcloseing事件,在这个事件中,有一个参数:e
这个e有一个属性,就是e.handle,表示是否处理过这个事件了。
这个时候,如果你不想让窗体关闭,你可以写:
e.handle=true,那么表示已经处理过窗体关闭的事件了。
注:有些情况,可能是:e.cancel=true
在暂停按钮的Click事件中设置:Timer1.Enable=False
在继续按钮的Click事件中设置:Timer1.Enable=True
没有资金。vbnet没有足够的资金支持,导致服务器无法开设,所以停止更新了。vbnet属于计算机软件领域,是计算机中实现网络功能的编程语言。
使用Timer控件不好,因为间隔设置太长不能及时停止,太短影响程序运行。最好的方法是设置一个变量来指示暂停标志。如下程序,在窗体中放置两个Command按钮,一个Label1标签,单击Command1,标签值从1~1000000开始变化,随时按Command2计划停止变化,再按继续。
Dim Pause As Boolean, I As Long
Private Sub Command1_Click()
For I = 1 To 1000000
DoEvents
Do While Pause = True
DoEvents
Loop
Label1 = I
Next
End Sub
Private Sub Command2_Click()
Pause = Not Pause
End Sub
Private Sub Form_Load()
Pause = False
End Sub