VB计时器作业,在线等,谢谢.12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧 - -!
来源:学生作业帮助网 编辑:六六作业网 时间:2024/10/06 16:57:50
VB计时器作业,在线等,谢谢.12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧--!VB计时器作业,在线等,谢谢.12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧--!VB
VB计时器作业,在线等,谢谢.12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧 - -!
VB计时器作业,在线等,谢谢.
12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧 - -!
VB计时器作业,在线等,谢谢.12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧 - -!
Dim s As Long
Private Sub Command1_Click()
If Option1.Value Then
s = 60
ElseIf Option2.Value Then
s = 300
Else
s = 600
End If
Timer1.Interval = 1000
Timer1.Enabled = True
Command1.Enabled = False
End Sub
Private Sub Timer1_Timer()
Dim mm As Integer, ss As Integer
mm = s \ 60
ss = s Mod 60
Label1.Caption = mm & "分" & ss & "秒"
If s > 0 Then
s = s - 1
Else
Timer1.Enabled = False
Command1.Enabled = True
End If
End Sub
所涉及的控件:Command1、Label1、Timer1、Option1、Option2、Option3、Frame1
VB计时器作业,在线等,谢谢.12点之前要提交,麻烦各位大神了.悬赏分可以提高,这题并不难吧 - -!
英语作业 高中 神七圆满成功 作文(时间23点之前 在线等)
密封场所内作业有哪三大危险因素? 在线等 谢谢
形容非常气愤,非常气恼的词语有什么?最好5个以上,在线等,请在8点之前给我,麻烦各位快一点,谢谢!
一篇作文,什么题目都行,越少越好.谢谢了快啊我在线等的.11点之前给我,写好了我加分的.快啊.
高中物理常量及数值在线等,详细点的,谢谢
治水必躬亲的论点,论据,论证请详细点,在线等,10点之前
英语苏教版八年级上册第三单元reading的翻译今晚22点之前,在线等
八上地理4.3工业的发展与分布(在线等,10点之前)
求四升五苏教版小学暑假作业答案(书名:) 求各位大神!! 急!在线等! 谢谢了!
求首都博物馆观后感,在线等700字作业,谢谢了初一
概括与总结哲学与世界观的关系是作业、在线等!谢谢啦
求解答,初一数学作业在线等,好评谢谢,要过程
经济法作业,求各位帮忙了,谢谢了,在线等,急啊
鲁庄公的鄙表现在哪里 用自己的话说作业啊,我在线等,谢谢!
老师今天作业:总结前出师表的实词虚词 谢谢大家 在线等
初二下开学数学分式在线等!明天交作业 重发图片,清楚点的
英语翻译 :电子杂志 在线等 谢谢