usi OleDb?

codice:
        Dim cmdOle As OleDbCommand = New OleDbCommand()
        cmdOle.CommandText = "INSERT INTO Table (DATA) VALUES (?)"
        cmdOle.Parameters.Add(New OleDbParameter("DATA", Date.Now))
usi SqlClient?

codice:
        Dim cmdSql As SqlCommand = New SqlCommand()
        cmdSql.CommandText = "INSERT INTO Table (DATA) VALUES (@DATA)"
        cmdSql.Parameters.Add(New SqlParameter("@DATA", Date.Now))