Private Sub bt_c_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_c.Click Form1_KeyDown(sender, New KeyEventArgs(Keys.C)) End Sub