1樓:伊號科技
option explicit
private declare function getasynckeystate lib "user32" (byval vkey as long) as long
private sub timer1_timer()
if getasynckeystate(vbkeyf7) then 』按f7就隱藏窗體。
if getasynckeystate(vbkeyf8) then 』按f8就隱藏窗體。
end sub
'(vbkeyf7) 你自己可以修改,如(vbkeyq),那就是按q鍵就執行。
不懂的話hi我。
2樓:匿名使用者
太簡單了,的確很多人都喜歡把簡單的問題複雜化。
第一:form的屬性中keypreview=true第二:在。
private sub form_keydown(keycode as integer, shift as integer)
end sub
加你想加東西。
注:在後臺時用。
3樓:匿名使用者
你這個要在windows全域性下起作用,不是很好實現的。需要寫hook。而且還有被安全軟體禁止的風險。
4樓:
都兩天了還沒弄好,真急人阿 ??
怎麼好像老師在佈置作業啊???
你們卻老是喜歡搞複雜化,脫離視窗的操作都需要在系統中設定,我前面給你的註冊熱鍵的**就是最正規的做法。也不知道你用過沒,哎。
5樓:
使用e丙命令或許可以達到要求。系統鉤子。
vb 按鍵觸發
6樓:揭莞然
private sub form_keydown(keycode as integer, shift as integer)
if keycode = 118 then
end sub
或private sub form_keydown(keycode as integer, shift as integer)
if keycode = vbkeyf7 then
end sub
在每個form_keydown事件中寫下以上程式。就可按f7都開啟form2
vb 如何按下鍵盤某鍵後觸發事件
7樓:匿名使用者
getkeystate()如果小於0就是按下,並不會觸發兩次的。
比如getkeystate(65)<0這樣就是按下。>=0就是彈起。
如果是你觸發兩次一定是用了<>0,但實際上用<0就可以。
vb的問題?急死人了
8樓:墨漬
private sub form_mousedown(button as integer, shift as integer, x as single, y as single)
button=4 then '如果滾輪被按下,=1是左鍵,=2是右鍵。
print x,y』簡單**行,列印座標。
end if
end sub
button不是用來賦值的,if是為了看你按的是哪一個鍵。=4,證明你按的是滾輪。
9樓:網友
vb 裡 對於button 有幾個數字表示它們按下的情況。
1 表示按下 左鍵。
2 表示按下右鍵。
3 表示按下左右鍵。
4 表示按下中間的鍵 就是那個滾軸。
5表示按下中間鍵和左鍵。
6表按下中間鍵和右鍵。
7表示三個鍵同時按下。
10樓:匿名使用者
button的值代表你按下的鍵,左鍵為1,右鍵為2,按下滾輪為一般不用,xy是滑鼠按下時的座標值。
除非你想模擬滑鼠操作動作,否則button的值不是由你來賦的,而是你對滑鼠做一個動作時,由系統自動判斷產生的。
vb 鍵盤問題 (按下某鍵觸發某事)
11樓:匿名使用者
新建一個vb工程(
加入一個timer
加入以下原始碼: 之後執行按一下 "空格" 鍵看看private declare function getasynckeystate lib "user32" (byval vkey as long) as integer
dim aprivate sub form_load() 100a=0end sub
private sub timer1_timer()if getasynckeystate(32) =32767 then
if a=0 then
msgbox "已成功":a=1
elsemsgbox "已結束":a=0
end if
end if
end sub
vb按鍵觸發時鐘事件
12樓:匿名使用者
在視窗點選右鍵選單,在裡面加入選單後選擇對應的快捷操作,然後在器中選擇你的選單就可以了 。如果不是f1這些特殊鍵的話,可以使用。
private sub form_keydown(keycode as integer, shift as integer)
if keycode = 112 then = true
if keycode = 113 then = true
if keycode = 114 then = true
end sub
13樓:紅山人
首先,要將窗體屬性keypreview的值設定為true
然後在**視窗用下面的**。
private sub form_keydown(keycode as integer, shift as integer)
if keycode = 112 then = true
if keycode = 113 then = true
if keycode = 114 then = true
end sub
vb高手來。求救啊 ·!要死人啦
14樓:匿名使用者
如果只是做介面的話就沒有什麼難度。
如果還要實現一樣的功能的話還是有點難度。
15樓:匿名使用者
沒有意義啊。
直接呼叫他啊。
16樓:匿名使用者
我可以完成你的要求,只是要花點時間,而且你的分也不夠啊。
病毒有哪些?怎麼防?急死人了!!!
怎麼辦?不知道有什麼有效的預防措施!快快告訴我,謝謝了!a的其他株或腸道病毒71型也可引起手足口病。柯薩奇病毒是腸道病毒的一種。怎樣防禦病毒 給系統經常打補丁,好多病毒都是從系統漏洞中侵入的哦,還要經常掃描下木馬病毒,主防毒軟體用卡或瑞星,輔助的用360安全衛士,windows清理助手,不要上小 還...
成都遷移戶口,如何辦理失業證啊?急死人了
你好,你的問題回覆如下 按照現行的戶口遷移政策,戶口接收方一般會要求投靠人提供失業證,其目的是為了規避為投靠人對口安排工作的麻煩 失業證一般是在戶籍所在地的社保部門辦理 要求是投靠人在本地與其工作單位脫離工作關係,憑工作單位在與投靠人結束員工關係後開具的退工單,退工單由用工所在地的人才市場開具,憑退...
現在滿臉的痘痘怎麼辦啊!!急死人了!
難道就讓青春痘毀掉你的青春嗎?飲食要清淡為主 去美容院 你的痘痘情況多久了?平時臉上出油多不多呢?痘痘是冒白尖的嗎?什麼時候開始長的呢?痘痘痛癢嗎?你是哪種膚質呢。啊 滿臉痘痘怎麼辦啊?超有效的祛痘藥膏合集 難道就讓青春痘毀掉你的青春嗎?我臉上好多痘痘怎麼辦啊!難道就讓青春痘毀掉你的青春嗎?超有效的...