代码及注释如下:
创新互联专注为客户提供全方位的互联网综合服务,包含不限于网站制作、成都网站制作、高阳网络推广、微信小程序开发、高阳网络营销、高阳企业策划、高阳品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;创新互联为所有大学生创业者提供高阳建站搭建服务,24小时服务热线:13518219792,官方网址:www.cdcxhl.com
Private Sub Form_KeyPress(KeyAscii As Integer)'在form上敲回车触发事件
If KeyAscii = 13 Then'如果按下的是回车键,注意回车Asc码是13
Call Command1_Click'那么执行command1点击事件
End If
End Sub
Default
本题考查控件的常见属性。对于所有具有Cancel属性的控件,Cancel表示该控件是否当按下“Esc”键时,执行某个事件过程。Enabled表示控件是否可以使用,命令按钮的默认属性为Default,表示当按下回车键的时候,执行某个命令按钮的事件过程。
扩展资料
VB常用控件的属性及功能:
控件目录: Form(窗体)、PictureBox (图片框)、Label (标签)、TextBox (文本框)、Frame (框架)、CommandButton(命令按钮)、OptionButton (选项按钮)
ListBox (列表框入Hscrolbar (水平滚动条) Vscrollbar (垂直滚动条)、 Timer (时钟)、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