以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  快捷键  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=153927)

--  作者:outcat
--  发布时间:2020/8/27 20:43:00
--  快捷键
老师,我窗体上有一个保存按钮,我想按快捷键 F3 然后再全局表  KeyDown

If e.KeyCode = Keys.F3 Then

    If Tables("feiyongMX").current Is Nothing Then
        Tables("feiyongTB").current.delete
    Else
        Tables("feiyongTB").current.save
        For Each r As Row In Tables("feiyongMX").Rows
            r.save
        Next
        Tables("feiyongTB").current.save
        \'DataTables("feiyongMX").save
    End If
    
    Tables("feiyongTB").AllowEdit=False
    MessageBox.show("保存成功","提示")
    
    e.form.close
    
    End If   

点,按钮可以执行,把代码写在这里,怎么不起作用呢

--  作者:有点蓝
--  发布时间:2020/8/27 21:22:00
--  
只有窗口有可以选择的控件如按钮、文本框处于选中状态的时候才有效的。

参考这种:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=52509