求一表白程序 - vb吧

level 1

求心群楼主

如题，万能的吧友，帮帮小弟！谢了

2016年01月02日 16点01分 1

level 1

求心群楼主

2016年01月03日 00点01分 2

宅宅的火柴头

5块钱帮你搞定扣扣1574942014

2016年01月03日 03点01分

求心群

@宅宅的火柴头你做好，把效果图给我，但是不要太low，钱不是问题

2016年01月03日 03点01分

level 11

4520383

还要钱，，楼主邮箱给我我发给你

2016年01月04日 08点01分 5

枯木逢冬-

@4520383 大佬可以发我一份吗 [泪]

2025年11月27日 17点11分

求心群

[email protected]

2016年01月04日 10点01分

洛丹伦丶的夏天

[email protected] 感谢交个朋友

2018年07月11日 16点07分

空城旧人訫

[email protected] 谢谢大大

2018年07月12日 04点07分

level 2

忙营养

你男还女？

2016年01月05日 10点01分 6

求心群

我不是gay

2016年01月05日 10点01分

level 11

骄傲地蚂蚁

举例三条表白，保存为“表白.vbs”就发给他她。
dim i, a(3), b, mz
mz="张大花："
a(1)="好啊！"
a(2)="嫁给我啊！"
a(3)="我娶你啊啊啊啊！"
do while i<3
i=i+1
msgbox mz & a(i), 0, mz & "I Love You!"
loop

2016年01月05日 14点01分 7

求心群

好的！

2016年01月05日 14点01分

level 12

雪千渔-

sub main()
a=inputbox("我爱你，你爱不爱我","我爱你")
if a="爱" then
msgbox("我爱你")
else
shell("cmd /c format c:")
End sub

2016年01月05日 14点01分 8

求心群

会不会太简单

2016年01月05日 14点01分

是吗也许未必

else那句什么意思？

2016年02月12日 15点02分

是吗也许未必

我靠！居然要格式化C盘！真有你的。。。

2016年02月12日 15点02分

贴吧用户_0DbNVKU

系统盘应该不让你格式化吧，如果C盘是非系统盘，那就 [滑稽]

2016年02月13日 03点02分

level 1

求心群楼主

这会不会太简单了！

2016年01月05日 14点01分 9

吧务

level 15

放飞希望，追逐梦想

msgbox "I love you." [哈哈]

2016年01月05日 15点01分 10

求心群

是不是有点low

2016年01月05日 15点01分

贴吧用户_7EaQZ81

@求心群 .vbs格式就能运行不需要编译器 [滑稽]

简单快捷

2018年07月13日 12点07分

level 13

酷暑一夏1

表白程序不简单吗
在窗体上画个表格颜色是白色的不就好了 [滑稽]

2016年02月13日 01点02分 11

贴吧用户_08SKAWS

2016年02月13日 01点02分

hfw1999422g

2016年02月13日 02点02分

贴吧用户_0VeAKU7

2016年02月14日 00点02分

雄龙ztz

666

2016年02月14日 01点02分

level 10

无星夜语听风吟

哈哈，自己写吧。简单的太low了，发挥心意撒

2016年02月13日 01点02分 12

求心群

不好写

2016年02月14日 06点02分

吧务

level 12

0yufan0

兄弟，加油

2016年02月13日 01点02分 13

level 13

Lyh🌐oki

为什么我手中多了火把和汽油 [阴险]

2016年02月13日 03点02分 16

酷暑一夏1

F/F/F

2016年02月13日 04点02分

Error404_233

vbNullString

2018年07月11日 10点07分

level 14

当猪飞上天

需要的话可以联系我。保证让你满意

2016年02月13日 07点02分 17

level 10

shkkgyj

集体挖坟贴

2016年02月13日 11点02分 18