Private Sub Command1_Click()
If Command1.Caption = "开始" Then Command1.Caption = "停止": Timer1.Enabled = True
If Command1.Caption = "停止" Then Command1.Caption = "开始": Timer1.Enabled = FalseEnd Sub
timer1没写代码。我只是想要timer1的enabled变成true 和 false而已。
但是这个语句执行无效。为什么呢?就算我把 Timer1.Enabled = True 这两句去掉,依然无法改变caption。
If Command1.Caption = "开始" Then Command1.Caption = "停止": Timer1.Enabled = True
If Command1.Caption = "停止" Then Command1.Caption = "开始": Timer1.Enabled = FalseEnd Sub
timer1没写代码。我只是想要timer1的enabled变成true 和 false而已。
但是这个语句执行无效。为什么呢?就算我把 Timer1.Enabled = True 这两句去掉,依然无法改变caption。
解决方案 »
- 如何寫手機與PC機的通訊協議?
- 一个VB做的EXE程序(国外软件),在英文环境下运行正常,在中文环境下出错,如何解决?
- 请问谁那儿有验证socks5代理的源程序?100分求!
- 一个有关时间显示的问题
- 如何将 form 表单的 text1.text 的值动态传送到水晶报表的页眉上?
- 怎么样用语句把ACCESS数据库里的数据导入DATAGIRD
- sql服务器端安装不上呀,怎么办呀
- Ado 中Update 出现的问题
- 有谁用过Canlendar控件?
- 数据软件dao360.dll引用的问题,报错:activeX不能创建对象;
- 请问世界上有没有这样一款虚拟串口程序?
- 请问VB6.0的基本运行库是那几个文件啊
建议用else来处理,这样通用!