简单小游戏VB程序
求一个用VB制作的小游戏的编程！简单的就行！做好后发给我~可追加分！huoxumoutian@hotmail.com字体最好用英文！急求！很简单的就行！...
求一个用VB制作的小游戏的编程！简单的就行！做好后发给我~可追加分！
huoxumoutian@hotmail.com 字体最好用英文！
急求！很简单的就行！ 展开
huoxumoutian@hotmail.com 字体最好用英文！
急求！很简单的就行！ 展开
4个回答
展开全部
Private a As Long '用于计时
'timer的时间设为1000,事件写入 a = a + 1
Private Sub Timer1_Timer()
a = a + 1
End Sub
Private Sub Form_Load()
timer1.Enabled = 0
End Sub
Private Sub CommandButton1_Click()
a = Int(Rnd() * 100) '随机一个1~99的整数
timer1.Enabled = 1
Do
b = Val(InputBox("输入数字"))
If a = b Then
timer1.Enabled = 0
MsgBox "猜对了,你用了" & a & "秒"
Exit Do
ElseIf a > b Then
MsgBox "太小了"
Else
MsgBox "太大了"
End If
Loop
End Sub
'timer的时间设为1000,事件写入 a = a + 1
Private Sub Timer1_Timer()
a = a + 1
End Sub
Private Sub Form_Load()
timer1.Enabled = 0
End Sub
Private Sub CommandButton1_Click()
a = Int(Rnd() * 100) '随机一个1~99的整数
timer1.Enabled = 1
Do
b = Val(InputBox("输入数字"))
If a = b Then
timer1.Enabled = 0
MsgBox "猜对了,你用了" & a & "秒"
Exit Do
ElseIf a > b Then
MsgBox "太小了"
Else
MsgBox "太大了"
End If
Loop
End Sub
更多追问追答
追问
能不能发到我邮箱上？我看不太懂。。
huoxumoutian@hotmail.com
追答
发给你了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
法本信息技术
2024-10-28 广告
作为深圳市法本信息技术股份有限公司的工作人员，开发软件需经历需求分析、设计、编码、测试和部署等阶段。首先明确软件功能需求，然后进行系统设计，包括模块划分、功能分配等。接着，依据设计进行编码实现，确保代码质量。完成编码后，进行详尽的测试以验证...
点击进入详情页
本回答由法本信息技术提供
展开全部
别急，不知道能否打开。（意思是最好安个VB）
还有谁要？
邮箱：
1257748127@qq.com
上面是程序代码。
还有谁要？
邮箱：
1257748127@qq.com
上面是程序代码。
更多追问追答
追问
ni fa le ma ?
追答
发了，如没收到，再发一次
其他人要的话，写信
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
求一个用VB制作的小游戏的编程
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
已送出拼图
追问
要用VB能打开的格式行吗
追答
你是不是要VB的源代码，VBP文件，保存的东西都要？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
