开始和停止怎么做到一个按键上啊?就是说按一下开始后,开始键就变为了停止了。怎么做的?我只会分开做。做在一起不会,希望各位指教!

解决方案 »

  1.   

    是按钮吗?
    Private Sub Command1_Click()
        If Command1.Caption = "开始" Then
            '开始的代码
            Command1.Caption = "停止"
        Else
            '停止的代码
            Command1.Caption = "开始"
        End If
    End Sub
      

  2.   

    做一个布尔的变量例如i
      在 command click 写代码
      if i=ture then 
      end 
      i=false
      else
      i=ture 
      start
     end if
      

  3.   

    谢谢 viena(维也纳nn-实心木头人)  已经可以了。非常感谢你。可惜我给不来分。不知道怎么给你