让子弹飞游戏手机版:VB按纽问题

来源:百度文库 编辑:高考问答 时间:2024/04/29 07:50:58
一个按纽
第 一 二 三 次点击.
出现不同的消息
最好写点原代码

设一个变量,每点击一次其值就自增一,根据其值的不同输出不同的消息

private sub command1_click()
static i as integer
i=1+1
select case i
case 1
msgbox "第一次"
case 2
msgbox "第二次"
case 3
msgbox "第三次"
end select
end sub

在按钮的事件里设置一个自加变量,
onclick_{
i=i+1
if i=1 then
msgbox "1"
elseif i=2 then
msgbox "2"
elseif i=3 then
msgbox "3
else
end if}