2017-05-22 1 views
0

키 입력을 사용하여 만든 버튼에서 버튼을 누르려고합니다..NET에서 BasicButton을 누르는 키 입력

  • 마우스를 사용하여 버튼을 클릭하면 아무런 문제가 없습니다. 모두 작동합니다.
  • 텍스트 상자에 &을 사용하여 ALT 키를 누를 동안 짧은 시간을 제공하려고했습니다. 기쁨 없음

.NET에 대해 많이 알지는 못하지만 약 하루가 지나면 간단하지 않다고 말할 수 있습니다.

바로 가기를 추가하고 싶습니다. 예 : B를 누르면이 경우 버튼을 누른 것처럼 작동합니다. BasicButton1_Click

다음은 현재 가지고있는 모든 코드입니다.

Public Class MainForm 

    Private Sub MainForm_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp 
     If e.Alt AndAlso e.KeyCode = Keys.W Then 
      BasicButton1.PerformClick() 
     End If 
    End Sub 
    '******************************************************************************* 
    '* Stop polling when the form is not visible in order to reduce communications 
    '* Copy this section of code to every new form created 
    '******************************************************************************* 
    Private Sub Form_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged 
     AdvancedHMIDrivers.Utilities.StopComsOnHidden(components, Me) 
    End Sub 

    '************************************** 
    '* Filling the form with a gradient 
    '************************************** 
    'Private Sub MainForm_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint 
    'Dim rect As New System.Drawing.Rectangle(0, 0, e.ClipRectangle.Width, e.ClipRectangle.Height) 
    'Dim gradientBrush As New Drawing.Drawing2D.LinearGradientBrush(New Point(0, 0), New Point(0, Height), System.Drawing.Color.FromArgb(180, 100, 200), System.Drawing.Color.FromArgb(110, 200, 255)) 
    'e.Graphics.FillRectangle(gradientBrush, rect) 
    'End Sub 

    Private Sub BasicButton1_Click(sender As Object, e As EventArgs) Handles BasicButton1.Click 

    End Sub 

    Private Sub BasicButton7_Click(sender As Object, e As EventArgs) Handles BasicButton7.Click 

    End Sub 

    Private Sub BasicButton2_Click(sender As Object, e As EventArgs) Handles BasicButton2.Click 

    End Sub 

    Private Sub MainForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load 

    End Sub 

    Private Sub BasicButton5_Click(sender As Object, e As EventArgs) Handles BasicButton5.Click 

    End Sub 

    Private Sub BasicButton3_Click(sender As Object, e As EventArgs) Handles BasicButton3.Click 

    End Sub 

    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged 

    End Sub 
End Class 

답변

0

키 트리거로 사용할 문자 앞에 Button.Text에 &을 삽입하십시오.

예를 들어 단추 텍스트가 "Click Me!"이고 Alt-M으로 단추를 트리거하려면 Button.Text를 Click &Me!으로 설정합니다.

그게 전부입니다. Windows/.NET은 나머지 부분을 처리합니다.

+0

안녕하세요, 저도 그랬습니다. 기쁨이 아닙니다. 나는 분명하지 않다면 미안합니다. – Arthor

관련 문제