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

[Backdown]

Scusate il titolo della discussione ma nn so come definire il mio problema.
Devo usare degli option button per decidere se usare un tipo di replace o un'altro...
cioè se option1 è attivato quando si clicca command1 allora quello che c'è nella textbox1 cambierà in base al primo tipo di replace (che non so come specificare), stesso discorso per option2 che però utilizzerà un altro tipo di replace.
Dove devo specificare i 2 tipi di replace e come devo fare a far si che quando option1 è attivato si utilizzi un tipo di replace?

[oregon]

Eh?

[andrea toniolo]

dim variabile1 as string
dim variabile2 as string
variabile1= replace (text1.text, "lettere da sostituire", "lettere da inserire")
variabile2= replace (text1.text, "lettere da sostituire", "lettere da inserire")

if option1=true then
text1.text = variabile1
elseif option2=true then
text1.text=variabile2
end if


credo che vadi, ciao

[Backdown]

ahahah... mi spiego meglio:
Sto creando un programma per creare nick in ascii...
esempio:
txtAscii.Text = Replace(txtAscii.Text, "a", "å")
txtAscii.Text = Replace(txtAscii.Text, "b", "ß")
ho aggiunto 2 option button. vorrei che se abilitato il 1° option button quando viene scritto "a" questo venga convertito come scritto sopra.
Mentre se abilitato il 2° option button vorrei che "a" venga replicato in questo modo:
txtAscii.Text = Replace(txtAscii.Text, "a", "Ä")

[alka]

Originariamente inviato da Backdown
Scusate il titolo della discussione ma nn so come definire il mio problema.

Ho corretto il titolo, ma non penso ci volesse molto...

[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

[Backdown]

va benissimo, ti ringrazio ...
non vorrei andare off topic ma vorrei chiedere un'altra cosa che riguarda sempre lo stesso programma:
ho abilitato anche un pulsante che quando lo si preme all'inizio e alla fine del nick creato in ascii spuntano degli abbellimenti, tipo:
Private Sub Command2_Click()
txtAscii.Text = Text1.Text + txtAscii.Text + Text2.Text
volevo però che questo fosse random, cioè ogni volta che si preme Command2 i testi che si aggiungono ai lati di txtAscii.Text cambino...

[oregon]

Testi random presi da una lista?

Crei un vettore di testi e usi la funzione Rnd per scegliere l'indice dell'elemento che aggiungerai ...

[Backdown]

ehm... nn ti ho capito, nn so cosa sia il vettore di testi
cmq specifico meglio:
avendo
Text1.Text = "(¯˜”°º°°•"
Text2.Text = "•°°º°”˜¯)"
usando questo:
txtAscii.Text = Text1.Text + txtAscii.Text + Text2.Text
i 2 testi andranno ai lati... ma vorrei che ogni volta che si preme il pulsante(lo stesso pulsante) Text1.Text e Text2.Text cambino... magari facendo riferimento ad altre textbox oppure che cambiano nelle stesse textbox, cmq anke se nn in modo random mi interessa sapere come queste cambiano ripremendo lo stesso pulsante

[Backdown]

richiedo supporto per la mia seconda richiesta =(