DataSource Controls :: Getting A Syntax Error

Dim connStr As String = " Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=W:PatioOrderApp_DataPatio.mdb"
Dim con As New OleDb.OleDbConnection(connStr)
Dim instr As String = " INSERT INTO tOrders([first_name],[last_name],[order],[comment]) Valuse(?,?,?,?)"
If IsValid Then
Using con
Using cmd As New OleDb.OleDbCommand(instr, con)
cmd.CommandType = CommandType.Text
cmd.Parameters.AddWithValue("first_name", DBNull.Value)
cmd.Parameters.AddWithValue("last_name", DBNull.Value)
cmd.Parameters.AddWithValue("order", DBNull.Value)
cmd.Parameters.AddWithValue("comment", menuDrinks.SelectedItem.ToString)
con.Open()
cmd.ExecuteNonQuery()
End Using
End Using
con.Close()
End If