凉风有信,秋月无边。
亏我思娇的情绪好比度日如年。

VB制作倒计时器问题

《VB制作倒计时器问题》正文开始,本次阅读大概6分钟。

Option Explicit Dim h As Integer, m As Integer, s As Integer Private Sub Command1_Click() If Not IsNumeric(Text1.Text) Then MsgBox "请正确小时数!" Exit Sub End If If Not IsNumeric(Text2.Text) Then MsgBox "请正确分钟数!" Exit Sub End If If Not IsNumeric(Text3.Text) Then MsgBox "请正确秒数!" Exit Sub End If h = Text1.Text m = Text2.Text s = Text3.Text If m >= 60 Then MsgBox "分钟数必须小于60!" Exit Sub End If If s >= 60 Then MsgBox "秒数必须小于60!" Exit Sub End If Timer1.Ena

赞(146)
【声明】:本博客不参与任何交易,也非中介,仅记录个人感兴趣的内容,内容均不作直接、间接、法定、约定的保证。访问本博客请务必遵守有关互联网的相关法律、规定与规则。一旦您访问本博客,即表示您已经知晓并接受了此声明通告。本博客资源仅供个人学习交流,请于下载后24小时内删除,不允许用于商业用途,否则法律问题自行承担。如果本文导致的版权问题以及内容纠错问题请联系站长QQ:1004619 | 点此给我发送邮件
本文标题:VB制作倒计时器问题
本文地址:https://www.1004619.com/nn/vbzzdjsqwt.html

《电子倒计时器品牌网》相关推荐