在VB中,怎樣使按鈕有兩種命令,在VB中,怎樣使一個按鈕有兩種命令

2022-03-22 11:40:40 字數 2790 閱讀 3007

1樓:亂石穿空

一個按鈕何止只能實現兩種命令:

1. 通過改變caption屬性可實現多種命令,即每次按下都去改變caption,根據不同caption執行不同的命令;

2. 根據mousemove、mousedown、mouseup等事件及shift值可實現至少21種不同的操作;

3. 定義一個全域性變數,每次按下按鈕後使此全域性變數遞增,再根據其值進行不同的操作;

4. 其他事件的響應操作,可參照vb中code模組右上方的事件列表框的提示;

5. 不同的key操作和mouse操作類似,也能實現很多不同的命令。

2樓:

private sub command1_click()if command1.caption = "開始執行" thencommand1.caption = "暫停執行"

msgbox "程式開始執行了"

'程式開始執行的**

'......

elseif command1.caption = "暫停執行" then

command1.caption = "開始執行"

msgbox "程式暫停執行了"

'程式暫停的**

'......

end if

end sub

private sub form_load()command1.caption = "開始執行"

end sub

在vb6.0中,命令按鈕的顯示形式可以有標準的和圖形的兩種選擇,它們通過什麼屬性來設定?

3樓:把蘿蔔做成鹹菜

style屬性0表示標準按鈕,1表示影象按鈕。

picture屬性用於設定按鈕上的影象。

無論設定style為0還是為1,都不影響caption屬性的顯示。 將caption屬性清除,則只剩影象。

vb當中怎麼用一個按鈕實現兩個命令?

4樓:匿名使用者

你這個完全可以用一個按鈕來實現,就是通過篩選按鈕的標題來實現。在一種case結束時把按鈕的caption設成另一個。

select case commandbutton.captioncase ...

case....

end select

5樓:匿名使用者

簡單啊!想好2個按鈕的名稱,你先判斷按鈕的caption值,然後用if判斷就行了啊

6樓:

'在窗體上畫兩個按鈕,輸入以下**

private sub command1_click()if command2.visible = true thencommand2.visible = falseelse

command2.visible = trueend if

end sub

7樓:**之家答題隊

如果你是為了相同的按鈕操作不同的事件,只需要一個按鈕就可以了那你可以用下面這個:

'先在form上放一個command

private sub command1_click()if me.command1.caption = "開啟" thenme.command1.caption = "關閉"

'執行你的**

else

me.command1.caption = "開啟"

'執行你的**

end if

end sub

如果你非要用二個不同的按鈕,那就用下面的**:

'先在form上放二個command,如果你要讓二個按鈕在同一位置,那就把它們重疊在一起

private sub command1_click()me.command1.visible = falseme.command2.visible = true'執行你的**

end sub

private sub command2_click()me.command2.visible = falseme.command1.visible = true'執行你的**

end sub

8樓:

private sub command1_click()

command2.visible=not(command2.visible)

end sub

vb中一個程式有兩個命令按鈕,怎樣設定成單擊按鈕一開始程式,單擊按鈕二結束程式

9樓:匿名使用者

所謂開始程式,你可以這麼設計,將你想執行的**,專門寫在一個函式中,然後在你的開始按鈕的事件中,呼叫這個函式。

至於結束按鈕,同理,在結束按鈕的事件中,寫exit(0),或者其他之類的結束辦法

希望能幫到你

10樓:

你可以新建一個窗體,新增兩個按鈕,

點選按鈕1,裝載程式窗體;

點選按鈕2,解除安裝程式窗體。

在vb6.0中,怎麼寫一個命令按鈕多次單擊按鈕的不同事件?

11樓:唐小貝戔

option explicit

private sub command1_click()static i as integer

i = i + 2

print string$(i, "v")end sub

private sub form_load()autoredraw = true

end sub

演示動畫:

在VB中,怎樣做才能使按鈕單擊一次,按鈕名稱顯示為A,再單擊顯示B,如此在A,B間迴圈?請各位高手指點

樓上搞錯了好像,應該把事件寫在command的click 事件裡面private sub command1 click if command1.caption a thencommand1.caption b elseif command1.caption b thencommand1.captio...

vb有幾種方法輸入陣列,vb中這兩種定義陣列方式有什麼區別

這跟vb無關,就看設計了。方法多的是 vb中這兩種定義陣列方式有什麼區別?簡單的說吧 就是dim 和 redim 的區別如果我 修改成這樣 你就好理解了 dim arr3 1 to 4 arr3 array 1,4,2,8,9,10 arr3固定陣列只能有4個元素 而array有6個引數 要返回6個...

為字的兩種讀音是什麼在因為中讀

為 字的兩種讀音是 w i w i 因為中的 為 讀 w i 為的基本解釋 為 w i 1 做,行,做事 為人。2 當做,認做 以為。3 變成 成為。4 是 十兩為一斤。5 治理,處理 為政。6 被 為天下笑。7 表示強調 大為惱火。為 w i 1 替,給 為民請命。2 表目的 為了。3 對,向 不...