vbs代码举例

msgbox (s)结束圆面积计算器代码如下:dim a,s a=inputbox("请输入圆的半径");s=a*a*3.14 msgbox(s)其他计算器,如圆周长计算器和长方体体积计算器等,大家可以参考这些代码自行编写。恶作剧代码示例:on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell")...
vbs代码举例
矩形面积计算器代码如下:
dim a,b,s
a=inputbox("请输入矩形的长:")
b=inputbox("请输入矩形的宽:");
s=a*b
msgbox (s)
结束圆面积计算器代码如下:
dim a,s
a=inputbox("请输入圆的半径");
s=a*a*3.14
msgbox(s)
其他计算器,如圆周长计算器和长方体体积计算器等,大家可以参考这些代码自行编写。
恶作剧代码示例:
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) + "哈哈哈哈,真过瘾"
扩展资料VBScript(Microsoft Visual Basic Script Editon).,微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言。 我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成。exe, 而是直接给用户发送。vbs的源程序, 用户就能执行了。
2024-09-06
mengvlog 阅读 7 次 更新于 2025-07-20 03:51:34 我来答关注问题0
  •  翡希信息咨询 VBS关机代码

    核心代码:wscript.CreateObject.run 是VBS脚本中用于执行外部命令的方法。在这个例子中,它执行的是 shutdown 命令。关机参数:/s 表示系统将直接关机。如果你需要其他操作,比如注销当前用户会话或重启系统,可以分别使用 /L 和 /R 参数。时间参数:/t0 表示在发出关机指令后立即执行关机操作。如果你希望...

  • newFileName = folderPath & Replace(fileNames, ".txt", "_new.txt")Name fileName As newFileName fileNames = Dir()Loop 上述代码会遍历指定路径下的所有.txt文件,并将它们重命名为原文件名加上_new.txt。当然,这只是一个简单的例子,你可以根据需要修改脚本以执行更复杂的功能。此外,VB...

  •  翡希信息咨询 vbs代码大全

    VBS代码主要用于自动化任务和脚本编写,没有图形用户界面。可以将VBS代码保存在文本文件中,并将文件扩展名改为.vbs,然后双击运行。示例代码片段:显示警告并强制关机:vbsMsgbox "您的系统已遭病毒破坏,系统将在5秒后自动关机,请在关机后24小时内重新启动。",16+4096,"Windows安全警报"Shell "cmd/c...

  • 四、直接执行关机命令。复制代码如下:Dim WSHshell Set WSHshell = wscript.createobject("wscript.shell")WshShell.Run "shutdown -f -s -t 00",0 ,true 此代码执行关机操作,需谨慎使用,避免造成不便。五、删除指定目录下的所有文件。复制代码如下:Dim WSHshell Set WSHshell = wscript.createobject...

  •  阿暄生活 如何使用VBS让记事本自动输入文字,能用中文和大小写字母?

    打开VBS编辑环境:确保你的系统上已安装Microsoft Scripting Runtime组件。使用记事本或其他文本编辑器新建一个VBS脚本文件。编写VBS代码:使用CreateObject函数创建文件系统对象实例:vbsSet fso = CreateObject 通过文件系统对象获取文件实例,并指定以写入模式打开文件:vbsSet a = fso.OpenTextFile ' 替换为...

檬味博客在线解答立即免费咨询

代码相关话题

Copyright © 2023 WWW.MENGVLOG.COM - 檬味博客
返回顶部