vbs整人代码（使用vbs进行整人的一些有趣代码）

使用vbs进行整人的一些有趣代码

概述：

VBScript（简称VBS）是一种微软开发的基础的脚本编程语言，常用于Windows系统的自动化操作和批量处理。虽然VBS的主要用途是辅助完成一些系统任务和自动化操作，但也可以用来写一些有趣的整人代码。

段落一：误导桌面图标

首先，我们可以通过VBS代码来误导桌面上的图标，使得点击图标时打开的不是预期的程序。这个小技巧可以用于整人，让他人对自己的电脑感到困惑。

下面是一个示例代码：

Set WshShell = WScript.CreateObject(\"WScript.Shell\")
WshShell.RegWrite \"HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders\\Desktop\", \"C:\\Windows\\System32\"

将上面的代码保存为.vbs文件，点击运行后，桌面上所有的快捷方式和文件夹都会指向系统32文件夹，而不是它们原本的目标。这会让桌面上的所有图标都变得无效，尽管它们的外观并没有改变。

段落二：模拟按键和鼠标操作

在VBS中，我们可以使用WshShell对象来模拟按键和鼠标操作，从而实现一些有趣的效果。例如，可以用下面的代码来模拟按下回车键：

Set WshShell = WScript.CreateObject(\"WScript.Shell\")
WshShell.SendKeys \"{ENTER}\"

使用类似的方法，我们还可以模拟按下其他按键，例如Tab键、空格键等等。这可以用于制作一个自动输入的脚本，或者在他人不知情的情况下自动完成一些操作。

要模拟鼠标操作，我们可以使用WshShell对象结合MouseMove和MouseClick方法。下面的代码演示了如何移动鼠标指针到屏幕的(100, 100)坐标处，并进行一次鼠标左键点击：

Set WshShell = WScript.CreateObject(\"WScript.Shell\")
WshShell.Run \"rundll32 user32.dll,SetCursorPos 100, 100\"
WScript.Sleep 500 ' 等待0.5秒，以便稳定光标位置
WshShell.Run \"rundll32 user32.dll, mouse_event, 2, 0, 0, 0\"
WshShell.Run \"rundll32 user32.dll, mouse_event, 4, 0, 0, 0\"

这段代码将鼠标指针移动到屏幕的(100, 100)坐标处，并进行一次鼠标左键点击。你可以通过修改坐标和调整click次数来实现更复杂的鼠标操作。

段落三：定时弹窗

最后，我们可以使用VBS来制作一个定时弹窗的整人小程序。下面的代码示例将在每天的固定时间弹出一个消息框：

Set WshShell = WScript.CreateObject(\"WScript.Shell\")
Do
    currentTime = Time
    If (currentTime = \"12:00:00 AM\") Then
        MsgBox \"Time for a break!\", vbInformation + vbOKOnly, \"Reminder\"
    End If
    WScript.Sleep 1000 ' 休眠1秒钟，避免CPU占用过高
Loop

将上述代码保存为.vbs文件并运行，它将每隔1秒钟检查当前时间，当发现是午夜12点时，弹出一个提醒框。你可以根据需要修改时间和弹窗内容，以满足自己的整人创意。

总结：

VBS作为一种脚本编程语言，可以为我们带来很多乐趣，尤其是在整人方面。上述示例只是其中的一部分，你可以根据自己的兴趣和想法，进一步发掘和创造有趣的整人代码。然而，请务必在应用这些代码时，遵循法律规定并尊重他人的隐私。