Syntax Error in insert into statement

Question

i don't seem to understand why I keep on getting a syntax error whenever i do insert something. I do check my database and it's the exact name as well as my declaration in my designer form

con.ConnectionString = dbcon

    con.Open()

    sql1 = "Insert Into Order(OrderDay,CustomerID,Quantity,Amount)"
    sql1 = sql1 + "Values ('" & DateTimePicker1.Text & "','" & cmbCustomer.Text & "',
    '" & txtQty.Text & "','" & txtAmount.Text & "' )"

    adapt.InsertCommand = New OleDbCommand(sql1, con)
    adapt.InsertCommand.ExecuteNonQuery()

    MsgBox("record inserted")
    con.Close()

    con.Open()