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

哈 哈 你那不好 表白不好
我写个给你表白吧~
------------------------------------------------------------------
文件名的 后面一定要是 .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

如果有错误 在联系我~

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

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