Visual Basic - problemas con consulta sql

en esta consulta de inserccion: sql1 = "INSERT INTO disco (ida,nombre,cdloc,datos) values (" & rs.Fields("ida") & ",'" & Text3 & "','" & Text4 & "','" & opcion & "')"
me he encontrado con lo siguiente;
al introducir un texto que posee una coma superior ( ' ) la sentencia me lo interpreta como que quiero introducir otro campo, con lo cual me da error. como lo puedo solucionar.
gracias

Puedes o bien utilizar un Command de ADO y agregar los parámetros o reemplazar donde está una coma superior (') por dos de ellas (''). Lo puedes hacer con la función Replace.

gracias cecilia. he utilizado la funcion replace y me ha ido bien