Dim s As String = "Tom said, ""The fox ran away."""
Result: Tom said, "The fox ran away."