vb 按鍵觸發,急死人啊,VB 按鍵觸發

時間 2023-04-15 20:39:07

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清理助手,不要上小 還...

成都遷移戶口,如何辦理失業證啊?急死人了

你好,你的問題回覆如下 按照現行的戶口遷移政策,戶口接收方一般會要求投靠人提供失業證,其目的是為了規避為投靠人對口安排工作的麻煩 失業證一般是在戶籍所在地的社保部門辦理 要求是投靠人在本地與其工作單位脫離工作關係,憑工作單位在與投靠人結束員工關係後開具的退工單,退工單由用工所在地的人才市場開具,憑退...

現在滿臉的痘痘怎麼辦啊!!急死人了!

難道就讓青春痘毀掉你的青春嗎?飲食要清淡為主 去美容院 你的痘痘情況多久了?平時臉上出油多不多呢?痘痘是冒白尖的嗎?什麼時候開始長的呢?痘痘痛癢嗎?你是哪種膚質呢。啊 滿臉痘痘怎麼辦啊?超有效的祛痘藥膏合集 難道就讓青春痘毀掉你的青春嗎?我臉上好多痘痘怎麼辦啊!難道就讓青春痘毀掉你的青春嗎?超有效的...