Grazie a tutti ma il problema l'ho risolto da me. La query esatta è:

dim query As String = "INSERT INTO [utenti] ([user],[password],[nome],[paese],[citta],[indirizzo],[telefono],[p_iva],[email],[professione],[data_registrazione],[ultimo_accesso]) VALUES ('"& user1 &"','"& pass1 &"','"& nome1 &"','"& paese1 &"','"& citta1 &"','"& indirizzo1 &"','"& telefono1 &"','"& iva1 &"','"& email1 &"','"& professione1 &"','"& data_registrazione1 &"','"& ultimo_accesso1 &"')"



Grazie a Tutti