菜鸟请教高手个编程 感谢!!
设计一个以分钟为单位的倒记时器. 用VB6.0
Option Explicit Dim szsj As Integer '文本框2中输入你倒计的时间,text1显示倒计时 Private Sub Command1_Click() szsj = Text2.Text Timer1.Enabled = True End Sub Private Sub Form_Load() End Sub Private Sub Timer1_Timer() szsj = szsj - 1 Text1.Text = Str(szsj) End Sub
答:界面上放个Label控件和一个Timer控件,加代码: Private Sub Form_Load() Timer1.Interval = 1000 Label...详情>>
答:详情>>