关于VB的一个很小的问题

来源：百度知道 编辑：UC知道 时间：2024/05/21 13:06:27
VB里的倒记时器怎么样按“开始”以后，那个按狃就自动变成“结束”

Dim flag As Boolean

Private Sub Command1_Click()
Command1.Caption = IIf(flag, "开始", "结束")
flag = Not flag
Timer1.Enabled = flag

End Sub

Private Sub Form_Load()
flag = False
Command1.Caption = "开始"
End Sub

VB6.0代码,如是VB.NET则将Caption改为Text:

Option Explicit
Dim flag As Boolean
Private Sub Command1_Click()
If flag Then
Command1.Caption = "开始"
Timer1.Enabled = False
Else
Command1.Caption = "结束"
Timer1.Enabled = True
End If
flag = Not flag
End Sub

Private Sub Form_Load()
Command1.Caption = "开始"
Timer1.Enabled = False
End Sub

按钮的名称.text="结束"

很简单的问题 当点击开始时 将它的Text属性等于"结束" 就可以了 这里将遇到一个问题就是将不知道调用的是哪个方法 你可以先定义一个字符串 接受TEXT的值 判断它是开始还是结束 然后调用不同的方法 并且在每个方法最后将TEXT属性改掉就可以了