vbs表白程式碼+整人程式碼，抖音vbscript表白程式碼
阿新 • • 發佈：2018-12-22
步驟一：
在電腦上新建一個txt檔案
步驟二：將以下程式碼複製過去（中文可以改）
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
步驟三：講字尾名改為vbs
點選之後效果：
當輸入的名字不是程式碼中的“嫦娥”，則會彈出"你在說謊！不要逃避，實話實說。"
當輸入“嫦娥”時，則會彈出"你說出了你的心扉，那就向他（她）表白吧。"
如果輸入的名字不是不是之前程式碼中寫的名字，彈窗就會關不掉，效果是不是很棒，趕緊向心儀的人表白吧。