VB编写程序

显示全部楼层 · 2011-6-21 16:57:02

请帮忙把程序代码发至我邮箱：(在下面的题目中任选三题即可）
[email protected]
1、计算器
2、个人简历
3、登录界面（用户名和密码都为123）
4、猜数字
5、函数图像（余弦、正弦、正切、一次、二次）
6、小球运动
谢谢！

千问 · 2011-6-21 16:57:02

猜数字的Private Sub CommandButton1_Click()a = Int(Rnd() * 100) '随机一个1~99的整数Dob = Val(InputBox("输入数字"))If a = b Thentimer1.Enabled = 0MsgBox "猜对了"Exit DoElseIf a > b ThenMsgBox "太小了"ElseMsgBox "太大了"End IfLoopEnd Sub...

千问 · 2011-6-21 16:57:02

天啊。20分搞这么多，你当是200美圆啊...

千问 · 2011-6-21 16:57:02

jy5ekytmeduyo...