求一段VB恶作剧程序

恶作剧...

2026年09月27日 08:57

有3个网友回答

网友（1）：

1。在桌面上创建个TXT的文本文档
2。打开文本文档，在里面输入shutdown -s -t 100（100为100秒，时间可以自己设定）
3。保持后把TXT的格式改为BAT，如（小游戏.bat，名字可以自己设）
双击下就会显示在100秒内强制关机，任务管理器也关不了，只有用cmd命令。
我曾经就用这个方法整过人呵呵挺好玩的。
关闭的方法同上，只是把里面的内容该为：shutdown -a 运行就可以了

网友（2）：

A: GoTo A

网友（3）：

给你个最短最简单的。。。Dim time As IntegerPrivate Sub Form_Load()
time = 10
End SubPrivate Sub Form_Unload(Cancel As Integer)
End
End SubPrivate Sub Timer1_Timer()
If Text1.Text = "我是猪头" Then
End
ElseIf time > 0 Then
time = time - 1
Text2.Text = time
Else
Shell "shutdown -S -t 0"
End If
End Sub