vb编写一个表白的程序

q编写A表白-3/？如何使用VB 编写一个简单的小程序？找个C语言或者c 程序for表白找个电脑小的给女朋友程序...注意使用的是VB-3。请各位VB专家帮我看看这个程序好吗？问个简单的VB 程序问题！这个程序就是让用户说喜欢的人是yumiko886才可以关闭，主要是下面这个循环doyouranswerinputbox(问题。

程序定义了你的爱人只能是yumiko886。如果你不失去这个人，那么她会一直循环下去。代码在这里，vbinformation vbOK而已。titleloopuntlyyouransweryourname，如果是这个人，执行它，msgboxscend，

我去。你应该去找冯·诺依曼，或者比尔。该死的。拍张照。就写在里面吧。嘿女孩。我的生活依赖于你。表白这么重要，当然要当面告诉她。有一个VB脚本，感觉不错。你需要它吗？其实你可以试试下一个搞笑的闪光灯，我没用过也不知道有没有。我只是给你一个想法，不一定要采纳。

DimX1，Y1，X2，y2 as integer \ x0d \ x0aDimIAsInteger \ x0d \ x0adimjasbulle \ x0d \ x0adimkasintegerdimwitheventslabel 1 aslabel \ x0d \ x0adimwitheventstimer 1 astimerprivate subform _ Activate()\ x0d \ x0ai 100 \ x0d \ x0ak 100 \ x0d \ x0ax 1 me。Width/2\x0d\x0aY1Me。height/3 \ x0d \ x0ax 2 x 1 \ x0d \ x0ay2y 1 \ x0d \ x0alabel 1。TopMe.Height/2Label1.Height/2\x0d\x0aLabel1。LeftMe.Width/2Label1.width/2 \ x0d \ x0aendsubprivateesubform _ Load()Me。背景色