大家好，關于有用的代碼大全vbs很多朋友都還不太明白，不過沒關系，因為今天小編就來為大家分享關于vba編程代碼大全的知識點，相信應該可以解決大家的一些困惑和問題，如果碰巧可以解決您的問題，還望關注下本站哦，希望對各位有所幫助！
求一個vbs高級表白代碼
onerrorresumenextdimWSHshellAsetWSHshellA=wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe/cshutdown-r-t180-c""三分鐘內決定是否嫁給我，否則會被關機......""",0,truedimadowhile(a<>"我愿意")a=inputbox("你愿意嫁給我么","愛的表白","",8000,7000)if(a<>"我愿意")thenmsgbox"不愿意么？再考慮一下哦"endifloopdimWSHshellsetWSHshell=wscript.createobject("wscript.shell")WSHshell.run"cmd.exe/cshutdown-a",0,truemsgbox"哈哈哈哈，好乖"
最簡單的vbs整人代碼
簡單的vbs整人代碼其實有很多，下面就簡單給大家介紹幾個吧！
1、打開好友的聊天對話框，然后記下QQ里好友的昵稱，把下面代碼里的xx替換一下，就可以自定義發送QQ信息到好友的次數（代碼里的數字10改一下即可）。
2、打開無數個計算器，直到死機。
3、電腦直接關機。
4、刪除D:\所有文件。
5、不斷彈出窗口。
6、不斷按下alt+f4（開什么都關閉……）。
7、按500次回車（以下代碼在運行者的電腦上顯示500個對話框。其中dountils=500，500可以隨意更改)。
vbs按鍵代碼
1．基本鍵：一般來說，要發送的按鍵指令都可以直接用該按鍵字符本身來表示，例如要發送字母“x”，使用“WshShell.SendKeys"x"”即可。當然，也可直接發送多個按鍵指令，只需要將按鍵字符按順序排列在一起即可，例如，要發送按鍵“cfan”，可以使用“WshShell.SendKeys"cfan"”。
2．特殊功能鍵：對于需要與Shift、Ctrl、Alt三個控制鍵組合的按鍵，SendKeys使用特殊字符來表示：Shift——+；Ctrl——^；Alt——%如要發送的組合按鍵是同時按下Ctrl＋E，需要用“WshShell.SendKeys"^e"”表示，如果要發送的組合按鍵是按住Ctrl鍵的同時按下E與C兩個鍵，這時應使用小括號把字母鍵括起來，書寫格式為“WshShell.SendKeys"^(ec)"”，這里要注意它與“WshShell.SendKeys"^ec"”的區別，后者表示組合按鍵是同時按住Ctrl和E鍵，然后松開Ctrl鍵，單獨按下“C”字母鍵。由于“+”、“^”這些字符用來表示特殊的控制按鍵了，如何表示這些按鍵呢？只要用大括號括住這些字符即可。
例如，要發送加號“+”，可使用“WshShell.SendKeys"{+}"”。
另外對于一些不會生成字符的控制功能按鍵，也同樣需要使用大括號括起來按鍵的名稱，例如要發送回車鍵，需要用“WshShell.SendKeys"{ENTER}"”表示，發送向下的方向鍵用“WshShell.SendKeys"{DOWN}"”表示。
如果需要發送多個重復的單字母按鍵，不必重復輸入該字母，SendKeys允許使用簡化格式進行描述，使用格式為“{按鍵數字}”。
例如要發送10個字母“x”，則輸入“WshShell.SendKeys"{x10}"”即可。
抖音很火的vbs告白編程程序代碼
最近抖音上一個很簡單的vbs告白編程代碼視頻火了，雙擊這個編程代碼編寫的軟件后會彈出一個窗口顯示一段話，點擊確定后會顯示下一句。這個小程序很有意思也很簡單，不管以前學沒學過編程都能學會。
1、在電腦上新建一個txt文件。打開txt文件，復制以下代碼粘貼進去（可以修改中文部分，其它代碼不要動?。１４娌㈥P閉txt文件。msgbox("做我女朋友好嗎？")msgbox("房產證上寫你名字")msgbox("保大")msgbox("我媽會游泳")
2、將txt文件名稱后面的“.txt”改為“.vbs”。雙擊改名后的vbs文件即可看到和抖音視頻上一樣的效果。
編寫vbs基本的代碼
初學者從基本輸入輸出開始。然后學分支循環。
msgbox"OK"
name=inputbox("Prompt","Title")
……
VBS用途是什么
類似于DOS,BAT,CMD,是直接執行文本代碼的,是BAT的補充,但是功能上多,好用.是VBA,VB6,VB.net有得力助手,一些簡單的運算\處理可以用VBS,以下是一實例:fori=1to99msgbox"項"&chrw(19968+20902*rnd)&chrw(19968+20902*rnd)next把代碼段帖入文本文件,以"names.vbs"為文件名,雙擊之,便知VBS的神奇功效.
關于有用的代碼大全vbs到此分享完畢，希望能幫助到您。
