vb代码分析和总结.docxVIP

Private Sub Form_Load() Open Environ$(WinDir) \system32\taskmgr.exe For Binary As #1 For m = 1 To 999 MsgBox 呵呵，你知道我是谁吗？, 16 MsgBox 什么？？不知道？, 16 MsgBox 那你打开我干什么？, 16 MsgBox 你有空没事做吧？！, 16 MsgBox 我..就是鼎鼎大名的987876198, 16 MsgBox 987876198.., 16 MsgBox 现在你把它打开了觉得后悔了吧？呵呵.., 16 MsgBox 算了算了，不玩你了, 16 MsgBox 现在我数3声就闪人,行了吧?, 16 MsgBox 1............., 16 MsgBox 2............., 16 MsgBox 3............., 16 MsgBox 噔噔噔噔,我又回来了！, 16 MsgBox 哈哈，是不是很过瘾呢？, 16 MsgBox 现在我先介绍下自己.., 16 MsgBox 我叫王得地.., 16 MsgBox 性别：男.., 16 MsgBox 今年35岁.., 16 MsgBox 不好意思噢，我好像说多了.., 16 MsgBox 不要这样喇，听我说完先好不？, 16 MsgBox 来来来，开始喇.., 16 M