点击按钮一,检测变量是否为2,如果是2变量变成1 , 如果不等于提示错误!
点击按钮二,检测变量是否为1如果为1变量变成2,如果不等于提示错误!
怎么弄啊!?
点击按钮一,检测变量是否为2,如果是2变量变成1 , 如果不等于提示错误!
点击按钮二,检测变量是否为1如果为1变量变成2,如果不等于提示错误!
怎么弄啊!?
dim i as integer
command1 点击事件
if i = 2 then
i = 1
else
msgbox "error"
end if
command2 同理
dim x
private sub command1_click()
if x=1 then
x=2
else
msgbox"error"
end if
end sub
private sub commamd2_click()
if x=2 then
x=1
else
msgbox"error"
end if
end sub
这个变量定义为窗体变量。