Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

如何给按纽指定快捷键

廖强  发表于:2009-04-11 06:45:10  
复制

如何给按纽指定快捷键

如何给按纽指定快捷键,例如按F2对应的就是保存按纽!请附带源码!谢谢

 

Top
钱玉炜 发表于:2009-04-11 08:20:20
假设你要让按钮的快捷键为A,则在按钮的标题属性的最后加上(&A),例如确定按钮,则在标题属性中改为 确定(&A)

张文 发表于:2009-04-11 09:18:44

1.在属性里:可用选否,(文本框的光框就定不了位)

2.标题属性中改为 确定(&A)



钱玉炜 发表于:2009-04-11 09:48:09

假设需要设置按钮的快捷键为F1,则在代码里加入如下代码

Private Sub 按钮名称_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
    Case vbKeyF1
        执行代码
End Select
End Sub

 

vbKeyF1是常数,如果需要设置成其他快捷键,可以使用vbKeyF2,vbKeyF3等

 



廖强 发表于:2009-04-13 12:50:03

不行啊! 在怎么测试运行不了!没反应



Access爱好者 发表于:2009-06-17 08:41:08

 Private Sub 按钮名称_KeyDown(KeyCode As Integer, Shift As Integer)
  if KeyCode = 113 Then   

    执行保存代码 

End Sub

  

   113代表F2键



豆豆 发表于:2009-06-17 17:32:05

请分别按下键盘上的F1,F2,F3看看效果。

 

点击下载此附件

总记录:6篇  页次:1/1 9 1 :