vb 動態新增 按鈕 事件

時間 2023-08-23 07:44:35

1樓:匿名使用者

可以考慮按鈕陣列,即新加的按鈕與已存在的按鈕name相同,僅具有不同的index,那麼這一組按鈕的相同事件都可以在同一個過程中實現,藉由這個過程的index引數來區別使用者單擊的是哪個按鈕。舉個例子:

兩個按鈕都叫做command1,index分別為0和1index為0 的按鈕的caption為“按鈕1”

index為1 的按鈕的caption為“按鈕2”

雙擊其中之一可新增**:

if index = 0 then

msgbox "你單擊了按鈕1"

elsemsgbox "單擊了按鈕2"、

end if

這樣新加了按鈕之後,照樣用已經存在的過程來處理單擊事件。

2樓:網友

vb沒有那麼大的功能的,你最好先定義一個cmd給他賦予屬性”在text1裡寫入。

shell c:\ 然後設定的觸發事件 是點選command1的時候 將這個cmd顯示出來。

所以呢,如果你想以你以上的思路去做的話,最好用visual studio做,因為這個編譯工具非常強大。

3樓:海浪人生

肯定可以建立的 按鈕。

也能刪除 按鈕。

不過你說的事件不確定就不太好弄了。

如果你是說執行text 裡面的內容 那是完全可以的。

樓上說的對 用組來實現。

怎樣指定一個動態增加按鈕的事件(vb.net)

4樓:匿名使用者

a在執行時將事件與事件處理程式相關聯。

addhandler event, addressof eventhandler

各部分說明。

event要處理的事件的名稱。

eventhandler

將處理事件的過程的名稱。

sub testevents()

dim obj as new class1

associate an event handler with an event.

addhandler , addressof eventhandler

call the method to raise the event.

stop handling events.

removehandler , addressof eventhandler

this event will not be handled.

end sub

sub eventhandler()

handle the event.

msgbox("eventhandler caught event.")

end sub

public class class1

declare an event.

public event ev_event()

sub causesomeevent()

raise an event.

raiseevent ev_event()

end sub

end class

比如:addhandler , addressof button1_click

明白了吧。

vb6.0動態增加按鈕

5樓:涐吢銥舊囿儚

其實也不是很難,給你一個框架,作為參考吧。

具體的也只有你自己進行完善。

先在窗體上新增一個標準按鈕。

在屬性視窗中,把它的 index屬性設定成 0

名稱改為 cmddyncmd (其它的名稱也行,注意後面的說明)

visible 可以設定成 false

option explicit

private lcmdindex as long

private sub loadcmdbutton()

這兒就是載入動態按鈕的。

dim i&

for i = 0 to nnn '這兒nnn等於你需要的按鈕數減1,可以用變數的。

你應該能通過你的“資料庫中"a"表中"名稱"欄位”專案數 來確定值為多少。

*注意這兒的 cmddyncmd 就是設計時確定的按鍵名稱 **

if (lcmdindex > 0) then load cmddyncmd(i)

cmddyncmd(i).visible = true

這兒的 caption 屬性,你自己用**跟你的 資料庫中"a"表中"名稱"欄位內容關聯。

cmddyncmd(i).caption = 動態按鈕" &i + 1

這兒的 x 、y 你可以根據 i 的值來進行計算。

cmddyncmd(i).top = x

cmddyncmd(i).left = y

直接 cmddyncmd(i).move x, y也行。

nextend sub

這兒就是動態按鈕的事件**。

根據 index 判斷是哪個按鈕觸發了事件。

跟你事先設計好的控制元件陣列完全是相同的用法。

*注意!!!注意這兒的 cmddyncmd 就是設計時確定的按鍵名稱。

private sub cmddyncmd_click(index as integer)

msgbox "你點選的是第 " index + 1 & 個動態按鈕。",64

具體事件**只能你自己寫。

end sub

vb中如何用**新增命令按鈕

6樓:杜哥是個小天才

按以下步驟實現動態新增命令按鈕。

1)新建一個vb6工程。

2)form1窗體**。

option explicit

定義要動態新增的命令按鈕變數(帶事件處理)

dim withevents cmdx as commandbutton

點選動態新增的按鈕,彈出對話方塊。

private sub cmdx_click()

msgbox "動態新增的命令按鈕!!!

end sub

滑鼠雙擊窗體,動態新增一個命令按鈕。

private sub form_dblclick()

if cmdx is nothing then

set cmdx = cmd1")

點選我呀"trueend if

end sub(3)執行。

啟動後滑鼠雙擊窗體點選命令按鈕,彈出一個對話方塊。

7樓:在世貿天階灌籃的高飛燕草

private sub form_load()"cmdok", form1

form1! =true

end sub

新增控制元件陣列的話,需要手動新增1個命令按鈕,把index設定為0private sub command1_click(index as integer)

static s

if index = 0 then

s = s + 1

load command1(s)

command1(s).visible = truecommand1(s).height = command1(s - 1).height + 500

end if

end sub

8樓:網友

你都有做過了還上來問幹嘛!傻子!語氣還硬的很,不要忘了現在你是在求人,知道也不告訴你。

vb動態新增的控制元件陣列怎麼響應事件?

9樓:匿名使用者

private sub command_click(index as integer)

index是控制元件屬性。可以說是指定代號,就是那個括號裡的數(index)

點下去之後看看這個command的代號(index)是多少select case index '檢查代號(index)是多少case 0 '如果代號(index)是0,msgbox "1號" '那就執行代號(index)為0的按鈕控制元件!(陣列從0排起的)

case 1

msgbox "2號"

case 2

msgbox "3號"

case 3

msgbox "4號 "

case 4

msgbox "5號 "

中間省略……

case 9

msgbox "10號 "

end select '把正確的都選出來了,任務結束end sub

c動態新增tree,c treeView 動態新增子節點的問題

treenode rootnode new treenode this.treeview1.nodes.add rootnode 就這樣加根節點,子節點也是同樣方法。語句 parentnode.childnodes.add childnode 其中 parentnode 父結點 childnodes...

請問如何在excel中可以新增按鍵,當按鍵按下後,所在行的內容不可更改被鎖定呢

程式代做喲,點名字發郵件聯絡。請問如何在excel中可以新增一個按鍵,實現以下功能,謝謝老師 5 格式已做好,其他內容自己填 用vba 應該能行。如何在excel中設定一個按鈕,當按鈕按下後,計算a1 a2 a3,而按鈕不按下的時候計算a1 a2的值 你好 可以做一個選擇按鈕。資料有效性 當選擇12...

js 動態新增的按鈕 onclick事件怎麼寫

我剛寫的.需要引用jquery,我這個jq用的是google的共用地址,你也可以換成自己的.在ie8下除錯的,其他沒事,用jquery的話一般瀏覽器都沒問題,試試吧 js設定onclick事件 春風化雨 html頁面設定onclick事件可以在html中設定,也可以在js中設定,下面分別介紹。你的 ...