การเขียนโปรแกรม vb ! even_click ต้องการใช้ e.keycode เเต่ว่า "KeyChar is not a member of System.EventArgs''

Private Sub btStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btStart.Click
        Dim currenttime As DateTime
        StartSecond = 0
        If Me.lblItemCode.Text <> "" Then
            If Me.cobOperator.Text = "" Then
                MsgBox("Plase input Operator No.", vbCritical + vbOKOnly)
                currenttime = Format(dtServerDateTime2, "yyyy-MM-dd H:mm:ss")
                Me.cobOperator.Focus()
                Me.btStart.Enabled = False
                Me.btStop.Enabled = False
                Me.btAdd.Enabled = False
                Me.btRemove.Enabled = False
                'currenttime = System.DateTime.Now.ToString("yyyy-MM-dd H:mm:ss")

            Else
                currenttime = Format(dtServerDateTime2, "yyyy-MM-dd H:mm:ss")
                Call Start_Data_New()
                Call Load_ExpectTime()
                Timer1.Enabled = True
                token_start = 0
                Me.btStart.Enabled = False
                Me.btStop.Enabled = True
                Me.btAdd.Enabled = True
                Me.btAdd.Focus()
                Me.btRemove.Enabled = True
                Me.btcall.Enabled = True 'prayoon 04/06/2018

                'เพิ่มปุ่ม finish ทำงานหลังจากการที่กด start แล้ว
                Me.btCloseOrder.Enabled = True
                'currenttime = System.DateTime.Now.ToString("yyyy-MM-dd H:mm:ss")
            End If
        End If
    End Sub