控制按键事件的按钮？答案

【问题标题】：Button to control Keypress event?控制按键事件的按钮？
【发布时间】：2015-02-20 21:48:20
【问题描述】：

我是 VB 的新手，但在我去这个网站的过程中学到了很多东西。我有另一个困境，这似乎是一个非常简单的解决方案，但我遇到了麻烦，即使通过搜索这个网站和谷歌也是如此。我想在我的表单上使用一个按钮来按住 shift 键。因此，当单击按钮时，会以编程方式按住 shift 键，直到再次单击该按钮。谢谢你

【问题讨论】：

标签： vb.net keypress

【解决方案1】：

我相信您正试图抓住按键。如果是这样，这将有所帮助：

Private Sub Form1_KeyDown(ByVal sender As Object, _ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
    If ProgressBar1.Value = 100 Then
        If e.KeyCode = Keys.G Then
      DO SOMETHING 
end if
end sub

您还可以使用其他东西，例如：

My.Computer.Keyboard.CtrlKeyDown

这可以包含在if 语句中。

例子：

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If My.Computer.Keyboard.CtrlKeyDown Then
me.hide
end sub

【讨论】：

谢谢，但我不相信这是解决我问题的方法。我不是想抓住一个关键事件。当用户单击屏幕上的按钮时，我需要以编程方式按住/设置一个键。更清楚地说，我正在使用“放大”控件，该控件需要用户按住 Shift 键（激活缩放控件），然后在他/她想要放大的地方拖动鼠标。我希望用户能够单击“放大”按钮，该按钮将以编程方式按住 Shift 键，这样用户所要做的就是拖动鼠标，无需用户按住 Shift 键.