Ошибка синтаксиса в инструкции Insert

---

Привет ребята,

Я получаю синтаксическую ошибку для приведенного ниже оператора. Но я не могу его найти, пожалуйста, проверьте и дайте мне знать, если вы его найдете. Заявление есть;

Использование sqlquery в качестве новой OleDb.OleDbCommand("INSERT INTO SFA Inventory(IMEINo,ProductName,Supplier,InvoiceNo,InvoiceDate,MobileNo,AppVersion)VALUES(?,?,?,?,?,?,?)", sqlconn)

Что я уже пробовал:

Весь мой код таков;

private Sub cmdStockAdd_Click(sender As Object, e As EventArgs) Handles cmdStockAdd.Click
        Dim res As String

        res = MsgBox("Do you want to Add this record", vbYesNo, "SFA-Inventory Add")
        If res = vbYes Then
            Try
                Using sqlconn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\Data\SFA\My Project\SFA Inventory\SFA Inventory\SFA Inventory.accdb")
                    Using sqlquery As New OleDb.OleDbCommand("INSERT INTO SFA Inventory(IMEINo,ProductName,Supplier,InvoiceNo,InvoiceDate,MobileNo,AppVersion)VALUES(?,?,?,?,?,?,?)", sqlconn)
                        sqlquery.Parameters.AddWithValue("@IMEI No", TextBox2.Text)
                        sqlquery.Parameters.AddWithValue("@Product Name", TextBox1.Text)
                        sqlquery.Parameters.AddWithValue("@Supplier", ComboBox1.Text)
                        sqlquery.Parameters.AddWithValue("@Invoice No", TextBox3.Text)
                        sqlquery.Parameters.AddWithValue("@Invoice Date", DateTimePicker1.Value.ToShortDateString())
                        sqlquery.Parameters.AddWithValue("@Mobile No", TextBox4.Text)
                        sqlquery.Parameters.AddWithValue("@App Version", TextBox5.Text)
                        sqlconn.Open()
                        sqlquery.ExecuteNonQuery()
                        MsgBox("Records inserted successfully", vbOKOnly, "Records inserted")
                        TextBox2.Text = ""
                        TextBox1.Text = ""
                        ComboBox1.Text = ""
                        TextBox3.Text = ""
                        DateTimePicker1.Value = DateTime.Now
                        TextBox4.Text = ""
                        TextBox5.Text = ""
                    End Using
                End Using
            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try
        Else
            Show()

        End If
    End Sub

---