Нужна функция на действие при нажатии определенной кнопки(Например при нажатии клавиши Enter происходит действие аналогичное клику по button1)

Public Class Form2
Dim cikl As Integer

Private Sub RichTextBox1_KeyPress(sender As Object, e As System.Windows.Forms.KeyPressEventArgs) Handles RichTextBox1.KeyPress

    If e.Handled = Keys.Enter Then
      If cikl Mod 2 = 0 Then
        button2.PerformClick() ' Создает событие Click для баттона.
       MessageBox.Show("Баттон2 был нажат")
      Else
        MessageBox.Show("Баттон2 не был нажат")
      End If
    cikl = cikl + 1
   End If
     
End Sub

Private Sub button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click

End Sub

End Class