論看了別人抖音vbs表白後
第一個、
開啟txt檔案，複製以下程式碼貼上進去（可以修改中文部分，其它程式碼不要動！）。儲存並關閉txt檔案。
msgbox("做我女朋友好嗎？")
msgbox("房產證上寫你名字")
msgbox("保大")
msgbox("我媽會游泳")
然後把檔案字尾名改成.vbs，這是最基本的，沒有邏輯。
若新建的txt檔案不顯示“.txt”，可隨便開啟一個資料夾，再點選【檢視】，在【副檔名】前面打勾即可。
第二個、
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell"
)
WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""三分鐘內決定是否嫁給我，否則會被關機......"" ",0 ,true
dim a
do while(a <> "我願意")
a = inputbox ("你願意嫁給我麼","愛的表白","",8000,7000)
if( a <> "我願意" ) then
msgbox "不願意麼？再考慮一下哦"
loop
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run
"cmd.exe /c shutdown -a",0 ,true
msgbox "哈哈哈哈，好乖"
裡面的漢字自己改成合適的。
如果對方不願意，真的會被關機哦，請謹慎使用。
第三個、
dim a
a="從我見到你的第一眼開始"
msgbox a
dim b
b="我就喜歡你了"
msgbox b
dim c
c="......"
msgbox c
就這樣一直下去想多長就多長 a
a="從我見到你的第一眼開始"
msgbox a
dim b
b="我就喜歡你了"
msgbox b
dim c
c="......"
msgbox c
就這樣一直下去想多長就多長第四個、
在桌面新建文字文件。然後開啟輸入如下程式碼：
const title = "愛情測試"
const yourname = "范冰冰"
const question = "你最喜歡的人是誰？請在下面的方框中輸入他（她）的名字。"
const info = "你在說謊！不要逃避，實話實說。"
const scend = "你說出了你的心扉，那就向他（她）表白吧。"
dim youranswer
do
youranswer = inputbox(question, title)
if youranswer <> yourname then msgbox info, vbinformation+vbokonly, title
loop until youranswer = yourname
msgbox scend, vbinformation+vbokonly, title
第五個、
http://jujuba.top/love
這個連結可以直接在手機端傳送，點開就是以上的效果，
qq和微信均可傳送，微信反應速度會快一點，如果對於不想傳送指令碼的人來說，
這個最簡單了。
因為本人學的是python，並不是，所以也都是借鑑居多，希望對大家表白有點幫助。
因為，這個真的比較簡單，只需要一個指令碼檔案就行，大家盡情使用吧。
用完覺得好用的小主回來點個贊。