Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

如何程序添加快捷键

时 间:2007-11-07 20:12:23
作 者:刘贵平整理   ID:14  城市:长沙
摘 要:如何程序添加快捷键
正 文:

想在一个软件加一些快捷键吗?

请看以下

实现过程:

1\新建一个数据库,新建一个窗体将其名称属性设置成为FRM_COMPANY,BPRDERSTYLE属性设置为3-FIXED DIALOG.

F1键的KEYCODE值为112,F2为113,F3为113,F4为115

 

2\引用MICROSOFT WINDOWS CONNON CONTROLS6.0(SP6)

3\在窗体上添加一些控件命令

主要程序代码如下:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  If KeyCode = 112 Then              'F1键
    If Toolbar1.Buttons(1).Enabled = True Then
       Call Add
    Else
    End If
  ElseIf KeyCode = 113 Then               'F2键
    If Toolbar1.Buttons(2).Enabled = True Then
       Call Saves
    Else
    End If
  ElseIf KeyCode = 114 Then              'F3键
    If Toolbar1.Buttons(3).Enabled = True Then
       Call Cancel
    Else
    End If
  ElseIf KeyCode = 115 Then              'F4键
    If Toolbar1.Buttons(4).Enabled = True Then
      End
    Else
    End If
  End If
End Sub
这样就可以按这些快捷键了!



Access软件网QQ交流群 (群号:483923997)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助