Visual Basic - borrar texto entre comillas

hola........hay alguna manera de borrar cualquier texto encerrado entre comillas?
por ejemplo si yo tengo: algun "día" se podra "borrar" el texto entre "comillas"
yo obtenga uno de estos 2 resultados
1) algun se podra el texto entre
2) algun "" se podra "" el texto entre ""
muchas gracias!

Para el primer resultado sería:
Private Sub Command1_Click()
Dim I As Integer
Dim Ban As Byte
Dim Valor As String
Ban = 0
For I = 1 To Len(Text1)
If Mid(Text1, I, 1) = Chr(34) Or Ban = 1 Then
If Ban = 0 Then
Ban = 1
ElseIf Mid(Text1, I, 1) = Chr(34) Then
Valor = Trim(Valor)
Ban = 0
End If
Else
Valor = Valor + Mid(Text1, I, 1)
End If
Next I
Text2 = Valor
End Sub
Para el segundo resultado sería:
Private Sub Command1_Click()
Dim I As Integer
Dim Ban As Byte
Dim Valor As String
Ban = 0
For I = 1 To Len(Text1)
If Mid(Text1, I, 1) = Chr(34) Or Ban = 1 Then
If Ban = 0 Then
Ban = 1
ElseIf Mid(Text1, I, 1) = Chr(34) Then
Valor = Valor + Chr(34) + Chr(34)
Ban = 0
End If
Else
Valor = Valor + Mid(Text1, I, 1)
End If
Next I
Text2 = Valor
End Sub