1樓:匿名使用者
form的keypreview屬性設定為true即可dim a as integer
private sub command1_click()call produce
label(a).backcolor = rgb(255, 0, 0)
end sub
private sub produce()randomize
a = int(rnd * 26)
end sub
private sub form_keydown(keycode as integer, shift as integer)
if keycode = 65 then
for each i in label
i.backcolor = rgb(1, 1, 1)next
end if
end sub
2樓:匿名使用者
這個程式你想的方式就不對! label()標籤陣列??
是這樣的 嗎?
3樓:
再加上一句:
private sub form_load()form1.keypreview = trueend sub
並且用英文輸入a
電腦不能啟動,滑鼠鍵盤無響應
你看下主版的燈有亮沒,如果沒有,證明你電源或者主版燒了 如果有亮,那麼是你的cd rom或者 rom 出問題了,跋掉線再啟動一下.重灌過系統沒?那重灌一次 我電腦以前3天裝一次系統 真的 中毒了,前不久我電腦也出現過這種狀態,一開啟就黑屏什麼也做不了,後來找明白的朋友看了看,人家就說中毒重灌吧!分別...
FLASH如何讓鍵盤響應按鈕時有與滑鼠點選的效果
你要先新建元素按鈕,然後用active的click.語句實驗。都什麼年代了 還用mx 2004 拿這麼舊的版本做東西能對才怪 換個flash 8 或者 9吧 剛看了你說的那種效果,你要的是一個觸發條件兩種效果。on keypress a 這是按鈕裡面的 所以當你按下a的時候,a就動了,可是你要按鈕也...
vb程式設計從鍵盤上輸入兩個正整數m和n求m和n的最
你明白這種求公因數演算法的思路就理解了。這是輾轉相除法 比如求 18 和 48 的最大公因數 第一部 大數除以小數取餘數 48 18 2 12第二部 餘數是零,結束運算,小數即為最大公因子 餘數不是零,繼續利用輾轉相除法,小數除以餘數再取餘數 18 12 1 6 第三步 如果餘數是零,則計算結束,上...