VB实验问题

按照参考答案做的,也检查了,就是不知道为什么按暂停键没有用

第1个回答  2015-06-12

估计是未对Timer控件的Interval赋值。该控件的这个属性是缺省设置值0。

Option Explicit
    
Private Sub Command1_Click()
    If Command1.Caption = "&S 暂停" Then
        Command1.Caption = "&C 继续"
        Timer1.Enabled = False
    Else
        Command1.Caption = "&S 暂停"
        Timer1.Enabled = True
    End If
End Sub

Private Sub Form_Load()
    Timer1.Interval = 100
End Sub

Private Sub Timer1_Timer()
    Text1 = Time
End Sub

 互相学习中 的回复是正解。

第2个回答  2015-06-12
caption属性错了,你的初始值是”&s 暂停 “ 不是 &S 暂停 ,大小写不一样本回答被提问者采纳
相似回答