VB编程代码？

要整人搞笑的，病毒的话要狠……

答案：'新建一个 timer 控件 命名为 timer1



Private Sub Form_Load()
Timer1.Interval = 1
Timer1.Enabled = True
End Sub


Private Sub Timer1_Timer()
MsgBox "真好笑。", vbInformation, ""
End Sub
form_load事件
do wihle (1)
msgbox"哈哈！！你被耍了",,"就是关不了我"
loop
不支持你的做法
限制鼠标/键盘输入：全屏+任何ASCII值均转化为0即可+恶毒的画面+恐吓文字+等待一段时间后，关闭他电脑等等，哈哈
需要可给你量身定做
其实一个删盘就好了。。

上一个：VB编程问题
下一个：VB编程问题