启用ctrl + S作为保存按钮的快捷方式

问题描述

我的代码是:

my code is :

'Private Sub ExpenseMaster_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown

 '    If (e.KeyCode = Keys.S && e.Control) Then


   '        Save.PerformClick()
   '    End If
   '
   'End Sub

帮助我了解如何在vb.net中启用ctrl + s?

我还尝试了SendKeys.Send(^ {s})来启用快捷方式.
请帮帮我.

Help me out how to enable ctrl + s in vb.net?

I have also tried SendKeys.Send(^{s}) to get short cut enabled.
Please help me out.

推荐答案

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    MessageBox.Show("Save Called")
End Sub
Private Sub Button1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button1.KeyDown
    If e.Control Then
        If e.KeyCode = Keys.S Then
            Button1.PerformClick()
        End If
    End If
End Sub

我刚刚注意到您想要一个小写的"s"，因此请适当修改我的代码.

I have just noticed that you want a lower case ''s'', so modify my code appropriately.

Me.KeyPreview = True

这篇关于启用ctrl + S作为保存按钮的快捷方式的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！