tft每日頭條

 > 生活

 > 程序員七夕表白代碼大全

程序員七夕表白代碼大全

生活 更新时间:2024-12-25 04:08:56

不要以為程序員都是木讷的,浪漫起來也會讓很多妹子心動的。而程序員的表白方式也很不一般,通過一堆代碼,無限釋放浪漫。今天教給大家通過改寫腳本語言,利用彈窗可充分自由發揮,用來表白或者惡搞都是不錯的選擇。

先來一個GIF動态圖,實例部分效果

程序員七夕表白代碼大全(程序員的浪漫彈窗表白)1

接下來我們講解實際操作,後附源碼。

1.環境

腳本運行在windows系統,使用vbs代碼.(沒有接觸過沒有關系,會用記事本編輯改寫文檔即可操作)

2.準備工作

桌面新建一個txt,将文末源碼拷貝到txt文件内,如下圖,對于藍框中的内容(雙引号括起來的)我們可以自己編寫,如果覺得現有模闆彈窗不夠,可以任意拷貝一行msgbox,修改雙引号内部内容即可。(其他的内容都不用改動)

程序員七夕表白代碼大全(程序員的浪漫彈窗表白)2

3.文件保存

更改完了模闆,就要注意文件保存。因為是腳本,我們需要注意保存的幾個細節,如下圖所示。

程序員七夕表白代碼大全(程序員的浪漫彈窗表白)3

最後點擊保存,就會在桌面新生成一個如下圖标的腳本代碼。(可能你看不到後綴名,隻要确保圖标一樣以及文件名一樣就沒問題)

程序員七夕表白代碼大全(程序員的浪漫彈窗表白)4

4.雙擊這個圖标,彈窗腳本就運行起來了

好了,放上一份讓妹子喜歡了半天的模闆,供參考。


set ws=createobject("wscript.shell")

dim i

i=0

do while a<>"我是你的女朋友"

i = i 1

a=inputbox("快在下面的框框裡輸入'我是你的女朋友',否則後果自負,快輸""我是你的女朋友"" ","輸不輸","")

loop

if i > 1 then

msgbox "早說就行了嘛",4096 64

MsgBox"鑒于态度不誠懇",4096 64

msgbox"請務必牢記'我是你的女朋友'!",4096 64

msgbox"給我可愛的女朋友講一個故事吧。",4096 64

Else

msgbox"這麼乖啊。那給女朋友講一個故事吧。",4096 64

End if

MsgBox"從前有座山!",4096 64

MsgBox"山裡有個廟.",4096 64

MsgBox"廟裡有個老和尚在講故事.",4096 64

msgbox"哎呀累了!數綿羊哄我睡覺",4096 64

b = inputbox("請小心輸入'哄'還是'不哄'","請輸入","")

if b = "哄" then

MsgBox"咦,竟然真的這麼乖,那就不懲罰你了.",4096 64

Else

msgbox"不管你是沒輸入還是輸入錯了,我都要給你懲罰,數100隻綿羊去",4096 64

for i=1 to 100

MsgBox i&"隻綿羊",4096 64

next

msgbox"哎呀我困了,這次就饒過你了,下次注意哦!",4096 64

End if

msgbox"最後問個問題,我是不是大好人!",4096 64

c = inputbox("是不是","請選擇","是")

if c = "是" then

msgbox"反手就是一個麼麼哒",4096 64

Else

msgbox"哼,不是大好人,我也要麼麼哒。",4096 64

end if


如果對代碼表白或者惡搞感興趣,就去試試吧。把難以說出口的話通過代碼表達出來,說不定今年聖誕節就脫單了。

,

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关生活资讯推荐

热门生活资讯推荐

网友关注

Copyright 2023-2024 - www.tftnews.com All Rights Reserved