If the user enters in apostrophe into the text box, I replace the apostrophe with two single quotes in my code.

strTC = Replace(txtTC1.Text.Trim, "'", "''")

Is this correct? I get an illegal character found in the statement.