VB中如何令按钮按后变Caption并改变代码?

来源:百度知道 编辑:UC知道 时间:2024/06/18 01:38:02
例如我在VB中新建了一个按钮,名为Command1,请问应该用什么代码使他按一下后名称变为Command2,并且结束上一代码的工作,进行另一代码的工作。其次,还要做到再点一下后,名称和代码又变回原来的Command1。

在click事件里写:
if command1.caption="command1" then
代码1
command1.caption="另一个名字"
else
代码2
command1.caption="command1"
end if

名称是只读的!同志有没有学过vb啊!
代码改变如下:
private b as boolean
private sub command1_click
b=not b
if b then
'原来的代码
else
'改变后的代码
end if
end sub

private sub command1_click()
if command1.caption= "command1" then
command1.caption="command2"
你要执行的代码1
end if
if command1.caption= "command2" then
command1.caption="command1"
你要执行的代码2
end if