急求!电子倒计时器vb
2018-4-17 0:0:0 wondial急求!电子倒计时器vb
急求!电子倒计时器vb给你程序参考,界面你自己设计下(二个Label,二个textbox,一个timer,一个command)Dim m, s As IntegerPrivate Sub Command1_Click()
?m = Val(Text1.Text)
?s = Val(Text2.Text)
Timer1.Enabled = True
End SubPrivate Sub Form_Load()
Label1.Caption = "分钟"
Label2.Caption = "秒"
Text1.Text = "01"
Text2.Text = "00"
Timer1.Interval = 1000
Timer1.Enabled = False
End SubPrivate Sub Timer1_Timer()
?s = s - 1
?If s < 0 Then
? ?If m > 0 Then
? ? ? ?s = 59
? ? ? ?m = m - 1
? ? ? ?Else
? ? ? ? ? MsgBox ("时间到")
? ? ? ? ? m = 1
? ? ? ? ? s = 0
? ? ? ? ? Timer1.Enabled = False
? ? ? ? ?
? ? End If
?End If
?Text1.Text = Format(m, "00")
?Text2.Text = Format(s, "00")End Sub
四十家三千山河
如果您的问题还没有解决,可以到 T+搜索>>上找一下答案
相关阅读
- 做材料出库单时,无法更改里面的明细,有修改的办法吗。2019-5-22 8:0:0
- T+升级账套出错:升级超时,线程超时,请重新登录再次升级@服务社区刘佳佳 @服务社区刘小艳2019-5-22 8:0:0
- vtop vm-1 收银机 现在零售POS软件 顾显在扫商品的时候会显示单价 在结算的时候不会显示总价,结完账又可以显示找零金额。打了400说在这边提交一下问题,求解决中,急急急。货都订了要开业了就差这个不行。2019-5-22 8:0:0
- 为什么每次打了最新补丁都会出现一些问题,昨天晚上更新了84号补丁,现在全部不能用了!!!1-所有的业务单据,选单生成的时候都报错!!!2019-5-22 8:0:0
- 希望T+的下个补丁能够处理下面一些需求:(1)存货中心——业务情况没有“出入库流水账”,查询比较麻烦,还有返回去 存货核算——出入库流水账 那里一个字一个字打出该存货然后查询流水账,操作麻烦,12.1(包括12.1)之前的版本也是,希望以后改进。(2)系统之间ctrl+c和ctrl+v不能好好实现,而且没有右键的复制和粘贴的,操作麻烦,希望能改进。2019-5-22 8:0:0
- T66.1产品,1-4月份固定资产与总帐对帐正常,5月份固定资产与总帐对帐时,固定资产中原值和累计折旧均为0,服务工程发一个“t6按照折旧信息表重算fa_total”语句,执行后固定资原值数是对的了,但累计折旧仍为0,并且本月结帐后下月计提折旧后发现本月折旧与累计折旧均为同一个数(一个月的折旧)2019-5-22 8:0:0
- 固定资产披露表里的累计折旧跟总帐里的数据不符合,总是比总帐里的数据多一个月的,怎么处理这个问题呢2019-5-22 8:0:0
- 材料出库单制单时参照入库单可以自动带出入库单单价,因为是食品行业,所以调料上是先从调料仓调拨到现场仓,在从现场仓做材料出库单时,就不能参照的功能,也不能自动找到入库单的单价,所以客户需要是材料出库自动带出入库单的单价。有点急。2019-5-22 8:0:0
- t3业务通第一次打开提示正在进入请等待2019-5-13 9:0:0
- T3财务报表模块点不开,第一次双击没有反应,第二次双击提示演示版,软件已经重装过,还是无法解决,怎么处理2019-5-10 7:0:0