Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
ULBS INFORMATICA

Index preturi

Boxa membrana tweeter infundata

Am nevoie de poze cu un curcubeu
 Whisky for Mac

Xiaomi 14 Gpay

Izolare zid exterior de scandura

Dezinstalare drivere W11 23H3
 Recomandare masina de spalat fiab...

BSOD din cauza Intel Audio DSP dr...

De ce sunt oamenii nostalgici

Cum vand casa fara factura Hidroe...
 Scor FICO minim

Tonometru compensat CAS?

polita RCA ONLINE

Termostat frigider - verificare
 

Functia Replace()

- - - - -
  • Please log in to reply
6 replies to this topic

#1
andreigherghe

andreigherghe

    Think different

  • Grup: Senior Members
  • Posts: 2,034
  • Înscris: 27.12.2007
Deci, as vrea sa fac un script de genul:
Intr-un richtextbox (RichTextBox1) sa scriu o propozitie (eg: Ce facetzi?) . Cand apas pe un buton (Button1), scriptul sa stie sa inlocuiasca acel tz, si sa-l faca ț. M-am jucat putin cu functia Replace(), dar fara rezultate.
Imi dati un exemplu de astfel de script? :rolleyes:

Edit:
Imi pare rau, am gasit deja solutia :D . Rog un moderator sa inchida/stearga topicul

Edited by andreigherghe, 08 September 2009 - 00:19.


#2
alex2300

alex2300

    Junior Member

  • Grup: Members
  • Posts: 226
  • Înscris: 16.04.2009
Cum ai reusit sa folosesi functia? Mie imi da eroare. Ceva in genul Replace is a namesapce ...

#3
andreigherghe

andreigherghe

    Think different

  • Grup: Senior Members
  • Posts: 2,034
  • Înscris: 27.12.2007
If InStr(1, RichTextBox1.Text, "krd") > 0 Then
                Dim txt
                txt = RichTextBox1.Text
                RichTextBox1.Text = Replace(txt, "krd", "cred")
End If

#4
dani.user

dani.user

    Guru Member

  • Grup: Senior Members
  • Posts: 30,233
  • Înscris: 24.02.2007
Mai pe scurt:

RichTextBox1.Text = Replace(RichTextBox1.Text, "krd", "cred")

#5
alex2300

alex2300

    Junior Member

  • Grup: Members
  • Posts: 226
  • Înscris: 16.04.2009

View Postandreigherghe, on 19th September 2009, 14:30, said:

If InStr(1, RichTextBox1.Text, "krd") > 0 Then
                Dim txt
                txt = RichTextBox1.Text
                RichTextBox1.Text = Replace(txt, "krd", "cred")
End If

dar daca vreau sa fac mai mmulte inlocuiri?
De exemplu vreau ca 3 sa il faca salut, 4 - ce faci si altele. Daca bag asta inclocuieste doar ultima fraza bagata cu replace.

#6
msmihai

msmihai

    Senior Member

  • Grup: Senior Members
  • Posts: 5,271
  • Înscris: 02.09.2006

View Postalex2300, on 19th September 2009, 16:54, said:

dar daca vreau sa fac mai mmulte inlocuiri?
De exemplu vreau ca 3 sa il faca salut, 4 - ce faci si altele. Daca bag asta inclocuieste doar ultima fraza bagata cu replace.

apelezi functia de mai multe ori pe acelasi text :frust:

#7
freshmeat

freshmeat

    Junior Member

  • Grup: Members
  • Posts: 113
  • Înscris: 10.04.2007
Cred ca asta te ajuta .. vezi atasament ...

Attached Files



Anunturi

Second Opinion Second Opinion

Folosind serviciul second opinion ne puteți trimite RMN-uri, CT -uri, angiografii, fișiere .pdf, documente medicale.

Astfel vă vom putea da o opinie neurochirurgicală, fără ca aceasta să poată înlocui un consult de specialitate. Răspunsurile vor fi date prin e-mail în cel mai scurt timp posibil (de obicei în mai putin de 24 de ore, dar nu mai mult de 48 de ore). Second opinion – Neurohope este un serviciu gratuit.

www.neurohope.ro

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate