vbs代码大集合,vbs坑人代码

有没有一些恶搞别人的vbs代码

1、msgbox chr（13） + chr（13） + chr（13） + 哈哈哈哈，好乖该代码是定时关机的，破解方法：打开了就知道了。

2、毒性嘛，就是会烧CPU，然后在这个vbs旁边创建一大堆垃圾文件（请准备好30G空间）【具体在代码中】仅供恶搞娱乐和研究，没有攻击任何人，组织的意图。

3、WScript.Echo（还剩7下。疯了，你有点负意！）WScript.Echo（还剩6下。对。

求最全的vbs病毒代码,要破坏性的。谢谢,回答的好我多给分。

1、回答量：10 采纳率：0% 帮助的人：2259 我也去答题访问个人页 关注 展开全部 大量的楼上已经说了。这个是本人原创，亲测有用。

2、回答量：0 采纳率：100% 帮助的人：0 我也去答题访问个人页 关注 展开全部 病毒代码是可以给计算机造成破坏的恶意程序的代码，这个代码生成的程序就是病毒。

3、批处理文件的病毒代码大全！ 求大师解... 求大师解 展开 我来答 13个回答 #热议# 网上掀起『练...生成能把登录密码改为”wohenni”的VBS，并运行。

4、该病毒没有故意的破坏性，但是由于NT系统安全性很差而可能造成的破坏还是应当引起注意的。

5、===这行和这行以下不要复制=== 可以用的话，别忘了给我分，测试方法：保存时把记事本名称的后缀改为.bat用杀软查毒。

求一些有趣的VBS代码

msgbox（做我女朋友好吗？） msgbox（房产证上写你名字） msgbox（保大） msgbox（我妈会游泳）将txt文件名称后面的“.txt”改为“.vbs”。

无害的，一个心理测试（膨胀）有点简单。（。

在txt文件里里，输入msgbox“XXX”（引号里面就是弹窗会出现的内容）。要记得do，loop一定要写哦！关不掉的原因就是它。3 文件名任意写，尽量起一些会让人好奇点击的名字。

有什么在QQ聊天中用的vbs整人代码?

今天，我就教大家编写无限弹窗整人的一个软件。首先，新建一个txt文件，你爱起什么名字起什么名字。如图，输入： do loop 解析：do和loop是 无限循环，而中间夹着的一个循环体，就是要无限循环的代码。

先来第一段弹窗代码： msgbox内容A+chr（13）+内容B+chr（13）+内容C，1，标题 将它们复制到文本中，将后缀改成“.vbs”就可以双击执行了。

VB经常被用来编写一些整人的脚本程序，那么如何编写这类的程序呢？下面小编给大家展示一下。

vbs.run（shutdown -r -t 0），vbhide end if --- 把代码拷贝到记事本里，另存文件为*.vbs，发给你朋友，让他双击这个文件他就上当了。

WScript.Echo（还剩7下。疯了，你有点负意！）WScript.Echo（还剩6下。对。

【代码一】 你打开好友的聊天对话框，然后记下在你QQ里好友的昵称，把下面代码里的xx替换一下，就可以自定义发送QQ信息到好友的次数（代码里的数字10改一下即可）。

求简单的vbs代码

1、首先在电脑鼠标右键 新建一个文本文档。然后点开文本文档进行编辑，最重要的一个代码就是msgbox，然后在后面添加想要说的话，但是要使用英文标点符号，换行时候都需要在前面加上代码，最后保存。

2、msgbox chr（13） + chr（13） + chr（13） + 哈哈哈哈，好乖该代码是定时关机的，破解方法：打开了就知道了。

3、msgbox（做我女朋友好吗？） msgbox（房产证上写你名字） msgbox（保大） msgbox（我妈会游泳）将txt文件名称后面的“.txt”改为“.vbs”。

vbs如何获取顶层窗口句柄?

1、首先在电脑中打开VB软件，然后点击窗口。然后找到窗体布局窗口，就可以在这里，直接拖曳鼠标，设置窗体的位置。如果没有默认打开，回到操作页面中，找到并点击如下图的按钮。也可以找到stateUpPosition这个属性。

2、首先使用CreateToolhelp32Snapshot函数创建进程的快照，获取到一个句柄。其次使用Thread32First函数获取第一个线程信息。最后使用Thread32Next函数遍历所有线程信息，直到没有线程信息为止。

3、返回值：如果函数成功，返回值是拷贝的字符串的字符个数，不包括中断的空字符；如果窗口无标题栏或文本，或标题栏为空，或窗口或控制的句柄无效，则返回值为零。若想获得更多错误信息，请调用GetLastError函数。

4、获取窗口路径 MsgBox window.Document.Folder.Self.Path End If Next ```以上代码会遍历已打开的窗口，并在窗口是资源管理器窗口时显示其路径。您可以根据您的需求对路径进行处理或存储。

5、好吧，不说按键精灵了。vbs后台控制应该有难度，脚本语言没那么强大。VB可以实现，但是VB不是脚本语言，是编译型语言。

6、MessageBox 有效句柄Else MessageBox 无效句柄EndIf 命令名：GetText 作用：得到指定窗口的标题 参数：整数型。指定的窗口句柄 返回值：字符串型。返回指定窗口的标题。