網(wǎng)站制作NEWS
vbs代碼舉例
矩形面積計算器代碼如下：
dim a,b,s
a=inputbox("請輸入矩形的長:")
b=inputbox("請輸入矩形的寬:");
s=a*b
msgbox (s)
結(jié)束圓面積計算器代碼如下：
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 ("說我是豬,就不關(guān)機，快撒，說 ""我是豬"" ","說不說","不說",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)解釋源代碼并執(zhí)行， 簡單點說就是你寫的程序不需要編譯成。exe, 而是直接給用戶發(fā)送。vbs的源程序， 用戶就能執(zhí)行了。
多重隨機標簽