1樓：匿名使用者
用文字框的keypress事件實現：
private sub text1_keypress(keyascii as integer)
if keyascii = 13 thencommand1_click
end if
end sub
private sub command1_click()print text1.text
end sub
2樓：匿名使用者
在文字框keypress事件中處理按鍵並呼叫相應按鈕的單擊事件過程即可：
private sub text1_keypress(keyascii as integer)
if keyascii=13 then command1_clickend sub
private sub command1_click()msgbox ""
'你的按鈕單擊事件**
end sub
3樓：匿名使用者
這個很難嗎？直接keydown事件刪除，只寫按鈕就可以了啊。想觸發就寫上keydown事件捕捉13就可以了
怎樣在vb中實現敲回車鍵執行單擊乙個按鈕的功能？
4樓：由菸姓琬
根據你這個窗體,覺得這樣設定就可以實現你要的功能.
將確定鍵
的default
設定為true
這樣就可以了.當你在text裡輸入內容後直接按回車。即執行了確定按鈕。
5樓：魚木混豬喲
**及註釋如下：
private sub form_keypress(keyascii as integer)'在form上敲回車觸發事件
if keyascii = 13 then'如果按下的是回車鍵，注意回車asc碼是13
call command1_click'那麼執行command1點選事件
end if
end sub
6樓：匿名使用者
有乙個屬性好象是以d開頭的(不好意思,以前用過).把它的值改成ture就好了
7樓：匿名使用者
你點那個控制項.然後在屬性框找到default的屬性改為true
8樓：中原一點紅先生
假設這個按鈕是command1,你只需要1行**就行了.
command1.default = true
9樓：泠月冰辰
把該按鈕的default屬性搞成true
vb中，如何用鍵盤的乙個鍵控制按鈕控制項？ 就是我如何能： 按『回車就能點按鈕控制項『開始
10樓：網海1書生
把這個按鈕控制項的default屬性設為true即可
如何在vb中做到在文字框裡按enter鍵和觸發按鈕的click事件一樣的效果
11樓：刺友互
1、首先，我們雙擊窗體空白處進入**視窗。
2、然後我們在事件中找到click事件。
3、這個時候我們便可以開始編寫**測試【print "我是click單擊屬性！"】。
4、然我們開始執行測試。
5、啟動後，我們在窗體空白處單擊。
6、這個時候我們將可以看到測試的效果。
注意事項：vb擁有圖形使用者介面（gui）和快速應用程式開發（rad）系統，可以輕易的使用dao、rdo、ado連線資料庫，或者輕鬆的建立active x控制項，用於高效生成型別安全和物件導向的應用程式。
12樓：匿名使用者
當textbox1裡發生keyascii=13 (即enter鍵)的keypress的時候，呼叫 cmdbutton1_click過程即可。
private sub textbox1_keypress(keyascii as integer)
if keyascii=13 then
keyascii=0
cmdbutton1_click
end if
end sub
但這樣有乙個弊端，textbox1無法輸入回車。建議使用功能鍵(ctrl、alt、shift)+enter，這樣的話，可以在keydown或者keyup裡寫這些**(keypress不帶功能鍵檢測)。
13樓：
private sub text1_keypress(keyascii as integer)
if keyascii = 13 then '13為回車鍵的ascii碼
call command1_click '呼叫按鈕按下過程keyascii = 0 '清除對文字框的輸入更新else
end if
end sub
14樓：
private sub textbox1_click(...)sec()
end sub
private sub textbox1_keypress(keyascii)
if keyascii=13 then
keyascii=0
sec()
end if
end sub
15樓：匿名使用者
我託空氣為郵差，把我的熱騰騰的問候裝訂成包裹，印上真心為郵戳，37度恆溫快遞，收件人是你。祝你：春節愉快！ 加分吧，嘻嘻
vb 如何檢查鍵盤輸入回車
16樓：匿名使用者
是通過檢查他的ascii碼來確定的,回車的ascii碼是13 所以在keypress事件檢查是不是輸入的13就可以達到這個目的,其它鍵也是一樣,只要檢查相應的ascii碼就好了,當然zgwxm 的**可以幫你驗證,你直接複製他的**貼到vb裡就看到效果了
17樓：匿名使用者
private sub form_keypress(keyascii as integer)
if keyascii = 13 then msgbox "你敲了回車鍵！"
end sub
vb裡鍵盤的四個箭頭鍵和回車鍵的keycode值是什麼？
18樓：匿名使用者
回車13
↑38↓40
←37→39
當然，如果你實在覺得keycode太麻煩，可以用vb自帶的常數解決回車是vbkeyreturn，上箭頭是vbkeyup，下箭頭是vbkeydown，左箭頭是vbkeyleft，右箭頭是vbkeyright
19樓：匿名使用者
13 回車
37 左方向鍵
38 上方向鍵
39 右方向鍵
40 下方向鍵
20樓：匿名使用者
private sub form_keydown(keycode as integer, shift as integer)
me.caption = keycode
end sub
怎樣在vb中，在任何情況下，按回車鍵都相當於單擊「是」按鈕；按esc鍵都相當於單擊「否」按鈕。
21樓：
在按鈕屬性視窗中有個default屬性，將它更改為true,以後按下回車鍵就相當於單擊是，同樣有個cancel屬性，將它更改為true,以後按下esc鍵就相當於單擊否。試試吧
22樓：匿名使用者
private sub form_load()command1.default = truecommand2.cancel = trueend sub
在程式的一開始就說明按鈕1按回車
按鈕按esc
也可以在按鈕的屬性框中設定
23樓：匿名使用者
你要在你的程式裡面寫好**，當鍵盤敲擊回車或「esc」時，你的程式執行時應該知道如何往下執行。具體**，自己網上可以搜到！
另外乙個方法，就是按鈕的屬性裡面好像是default的值可以設定你想要的要求。
24樓：資料恢復
當鍵盤敲擊回車或「esc」時，你的程式執行時應該知道如何往下執行。具體**，自己網上可以搜到
vb中怎樣設定使安回車鍵相當於單擊按鈕？
25樓：
如果有一按鈕事件command1_clickprivate sub text1_keypress(...)if keyascii=13 then
command1_click
end if
end sub
26樓：
在每乙個控制項的keypress事件過程中都加入如下語句：
if keyascii = 13 then command1_click即可。
27樓：匿名使用者
設定該按紐的default屬性為ture
28樓：匿名使用者
最好途徑：按鈕的default設為真
此好的：窗體的keypreview設為真
然後：private sub form_keypress(keyascii as integer)
if keyascii = 13 then command1.value = true
end sub
29樓：匿名使用者
我明白你要的意思
這樣把commandbutton的default屬性設定為true即可，程式執行時直接回車！！
不會沒分吧？
30樓：匿名使用者
private sub form_keydown(keycode as integer, shift as integer)
if keycode = 13 then command1.value = true
if keycode = 27 then command2.value = true
end sub
command1是「是」按鈕
command2是「否」按鈕
vb滑鼠離開按鈕事件VB滑鼠移動到按鈕控制項上會觸發什麼事件？
直接的滑鼠離開事件是沒有的 這要通過訊息處理才能解決 對於滑鼠在未按下時移動進入按鈕和離開按鈕可以按以下方法簡單處理 private declare function setcapture lib user32 byval hwnd as long as long private declare f...
VB遮蔽鍵盤問題，vb 如何 遮蔽 鍵盤指定按鍵
僅僅只是遮蔽系統的組合鍵的話根本是不需要用到hook的，你只需要用乙個api就可以，具體的忘了，好像是screen什麼的，意思大概就是屏保什麼的。得找一下以前寫的一些 但是不可以遮蔽alt f4 建議學習系統鉤子問題。vb 如何 遮蔽 鍵盤指定按鍵 將窗體的keypreview屬性設定為true 在...
在VB裡，如何設定乙個按鈕恒為預設按鈕？
把該按鈕的default屬性設為true.任何時候只要按回車鍵，這個按鍵就會被觸發。private sub form keydown keycode as integer,shift as integer msgbox keycode end sub private sub form load tr...