QQ网名大全

急 求懂VB程序的 帮我 编写以下程序 谢谢 是电子摇奖机的 一个程序

添加一个Command控件,取名:comm
添加一个Label控件,取名:Lab
添加一个Timer控件,取名:Timer1,每200毫秒执行一次。

Private sub timer1_timer()
Lab.caption = rnd() * 100
end sub

Private sub command1_click()
if comm.caption = "开始" then
comm.caption = "停止"
print lab.caption
else
comm.caption = "开始"
end if
end sub
佚名
2024-12-23 00:20:41
最佳回答
类似问题(10)