在vb6.0中怎么让一个数字的最大值为60到达60后就归0,后继续增加。

 我来答
娄若枫c0
2014-03-04
知道答主
回答量:24
采纳率:0%
帮助的人:17万
展开全部
向窗体上添加一个文本框Text1,将其文本清空,再添加一个定时器Timer1,设置Timer1的Interval属性为1000,然后在定时器的Timer事件过程中编写以下代码:
Text1.Text = (Val(Text1.Text) + 1) Mod 61
这样文本框的的内容就会每隔1秒变化一个值。到60后自动回0
追问
能给我qq吗我有问题请教你!!随后采纳!!!
百度网友dab62c17e
2014-03-04 · TA获得超过2348个赞
知道大有可为答主
回答量:3575
采纳率:33%
帮助的人:1243万
展开全部
'拉一个textbox,一个timer,复制以下代码:
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Text1.Text = Second(Time)
End Sub
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式