代碼及注釋如下:
創(chuàng)新互聯(lián)專(zhuān)注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù),包含不限于網(wǎng)站制作、成都網(wǎng)站制作、高陽(yáng)網(wǎng)絡(luò)推廣、微信小程序開(kāi)發(fā)、高陽(yáng)網(wǎng)絡(luò)營(yíng)銷(xiāo)、高陽(yáng)企業(yè)策劃、高陽(yáng)品牌公關(guān)、搜索引擎seo、人物專(zhuān)訪、企業(yè)宣傳片、企業(yè)代運(yùn)營(yíng)等,從售前售中售后,我們都將竭誠(chéng)為您服務(wù),您的肯定,是我們最大的嘉獎(jiǎng);創(chuàng)新互聯(lián)為所有大學(xué)生創(chuàng)業(yè)者提供高陽(yáng)建站搭建服務(wù),24小時(shí)服務(wù)熱線:13518219792,官方網(wǎng)址:www.cdcxhl.com
Private Sub Form_KeyPress(KeyAscii As Integer)'在form上敲回車(chē)觸發(fā)事件
If KeyAscii = 13 Then'如果按下的是回車(chē)鍵,注意回車(chē)Asc碼是13
Call Command1_Click'那么執(zhí)行command1點(diǎn)擊事件
End If
End Sub
Default
本題考查控件的常見(jiàn)屬性。對(duì)于所有具有Cancel屬性的控件,Cancel表示該控件是否當(dāng)按下“Esc”鍵時(shí),執(zhí)行某個(gè)事件過(guò)程。Enabled表示控件是否可以使用,命令按鈕的默認(rèn)屬性為Default,表示當(dāng)按下回車(chē)鍵的時(shí)候,執(zhí)行某個(gè)命令按鈕的事件過(guò)程。
擴(kuò)展資料
VB常用控件的屬性及功能:
控件目錄:?Form(窗體)、PictureBox?(圖片框)、Label?(標(biāo)簽)、TextBox?(文本框)、Frame?(框架)、CommandButton(命令按鈕)、OptionButton?(選項(xiàng)按鈕)
ListBox?(列表框入Hscrolbar?(水平滾動(dòng)條)?Vscrollbar?(垂直滾動(dòng)條)、??Timer?(時(shí)鐘)、Shape?(形狀)、Line?(直線)、Image?(圖片框入??OLE?Container?(OLE容器)
Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.KeyCode = Keys.Enter Then....................... End If End Sub
在KeyPress事件中加入代碼
if keyascii=13 then
keyascii=0
end if