[VB6]: Differenti operazioni di Replace in base ad OptionButton

[oregon]

Ora si comincia a capire ...

Molto semplicemente, dato che si tratta di due casi, scrivi
If Option1 ... Then
txtAscii.Text = Replace(txtAscii.Text, "a", "å")
End If

If Option2 ... Then
txtAscii.Text = Replace(txtAscii.Text, "a", "Ä")
End If