Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim MyCommand As New MySqlCommand
con.Open()
MyCommand.Connection = con
MyCommand.CommandText = “INSERT INTO Employee(IDNo,FirstName,LastName,email) VALUES( ‘” & txtID.Text & “‘,’” & txtfirstname.Text & “‘,’” & txtlastname.Text & “‘,’” & txtemail.Text & “‘)”
MyCommand.ExecuteNonQuery()
con.Close()
MsgBox(“Record successfully added!”)

End Sub