简单的VB编程题，在线等。

2024-11-04 18:52:29

推荐回答（3个）

回答（1）：

哈哈你那不好表白不好
我写个给你表白吧~
------------------------------------------------------------------
文件名的后面一定要是 .VBE 我想你应该知道！我爱你.VBE

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""请说“我爱你”·不说的话电脑都会伤心的关机··"" ",0 ,true
dim a
do while(a <> "我爱你")
a = inputbox ("请说“我爱你”,就不关机，快嘛，说 ""我爱你"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛亲爱的"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，我爱死你乐！~"
-----------------------------------------------------------------
复制到笔记本文件保存为.VBE

分分分
我不知道我回答的是否正确我没仔细看
我要上学去了88888

如果有错误在联系我~

回答（2）：

我只看懂了一句 print汉字“我爱你”。

回答（3）：

说白了，就是想用计算机打印出来一堆公式证明“我爱你”，追女孩用这种手段?很狡猾啊~~~~
回到题目上，如果想做这种东西，不建议你用VB，界面效果太呆板，可能用Flash之类看起来效果会比较好。至于公式、定律以及如何组织，这个要发挥你自己的想象力准备和规划（追女孩子还要别人帮你出力是不是太懒惰了点？）。