จะทำการเพิ่มข้อมูลลงฐานข้อมูลMySQL จาก VB2008 แต่ติดปัญหาช่วยทีครับผู้รู้

Imports System.Data
Imports System.Data.SqlClient
Public Class FrmCustomer

Private Sub Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Save.Click
        If CusID.Text = "" Then
            MsgBox("กรุณากรอกรหัสลูกค้า")
        ElseIf CusName.Text = "" Then
            MsgBox("กรุณากรอกกรอกชื่อ")
        ElseIf CusLname.Text = "" Then
            MsgBox("กรุณากรอกนามสกุล")
        ElseIf CusIDCard.Text = "" Then
            MsgBox("กรุณากรอกรหัสบัตรประชาชน")
        ElseIf CusTel.Text = "" Then
            MsgBox("กรุณากรอกเบอร์โทรศัพท์")
        ElseIf CusAddress.Text = "" Then
            MsgBox("กรุณากรอกที่อยู่")
        End If

        Dim sex As String = ""
        If male.Checked Then
            sex = "0"
        Else
            sex = "1"
        End If

        Dim conn As New SqlConnection
        conn.ConnectionString = "Data Source=ASUS\SQLEXPRESS;Initial Catalog='Travel Raft Rent System';Integrated Security=True"
        conn.Open()

        Dim myCommand As New SqlCommand("INSERT INTO customer VALUES('" & CusID.Text & "','" & CusName.Text & "','" & CusLname.Text & "','" & sex & "','" & CusIDCard.Text & "','" & CusTel.Text & "', '" & CusAddress.Text & "', '" & CusEmail.Text & "')", conn)
        myCommand.ExecuteNonQuery()
        MsgBox("ระบบทำการบันทึกข้อมูลเรียบร้อยแล้ว")
    End Sub
End Class