如何讓VB陣列控制項隨機移動?

2024-12-31 17:00:09 字數 1706 閱讀 8392

1樓:網友

private sub timer1_timer()for n2=0 to 10

n1 = int(rnd * 4) '這裡的4是指4個不同**。

image2(n2).picture = picture1(n1).picture

image2(n2).move image2(n2).left + 0, image2(n2).top + 500 '讓image2陣列控制項降落。

if image2(n2).top >= thenimage2(n2).left = x

image2(n2).top = y

end if

nextend sub

如何在vb中用**一起移動若干控制項的位置?

2樓:匿名使用者

把這些控制項記錄在陣列裡。等要移動的時候,對每個控制項,修改左上角位置不行嗎?

3樓:匿名使用者

控制項陣列command1(0)到command1(29)移動式直接在command1的事件**設定。

4樓:匿名使用者

按鈕全部放在frame1控制項裡用**移動frame1的位置不就行了。

如何用vb的command控制項陣列出現隨機色塊

5樓:網友

command控制項在的style = 1,時backcolor 可以設定值。

但command控制項在的style 屬性只能在設計時可設定,執行時,為唯讀。

求助vb 怎樣讓frame1控制項在窗體上自由移動

6樓:網友

實話實說vb的移動功能不是很好,只能夠同時移動乙個方向,比如水平移動或垂直移動,方法是檢測按鍵,加減座標。需要的話留個郵箱,給你發個例子。

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

7樓:網友

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

vb如何判斷乙個動態生成的控制項陣列的控制項個數?

8樓:尚心部落

判斷元素個數:

若想改變控制項陣列中元素的個數,只能是load或者unload

9樓:網友

返回陣列長度用ubound(text())可不可以?

動態生成的控制項只能用unload釋放,否則在窗體銷燬時釋放。

求VB幫助控制項陣列的問題

品牌3個按鈕為command1控制項組 品牌資訊3個文字框為text1控制項組 各個品牌數量及總價為text2控制項組 確定取消結束為command2控制項組 private sub command1 click index as integer if index 0 then text1 0 愛國...

VB中怎麼統計隨機十組隨機數陣列後第一位出現最多的某個數字

private sub command1 click dim a 10,6 as string 2,b 30 as integer dim max as integer,maxi as integer,maxj as integer randomize for i 1 to 6 print 第 i ...

如何用vb隨機大寫字母

1 首先開啟vb程式,新建一個工程,如圖所示。2 這裡我們選擇 標準exe 單擊 確定 按鈕。3 該軟體的介面還是比較簡潔的,左邊是常用的工具箱,右邊是相關的屬性欄目。先把我們要製作的軟體命名,如圖,在 caption 後面輸入 隨機選號器 4 選擇 commandbutton 工具,在目標區域用滑...