Hvordan lage Visual Basic Applications for å variere staving av ord
Opprette et enkelt finne og erstatte funksjonen for Visual Basic-programmet krever bare noen få grunnleggende kontroller og en eneste linje med programmering knyttet til knappen som starter finne / erstatte operasjon.
Bruksanvisning
1 Opprett et nytt prosjekt med et skjema.
2 Legge til en tekstboks til skjemaet. Name it "findBox." Legg en etikett ved siden av den og endre teksten til "Finn". Dette er den boksen der brukeren skal skrive inn ord som de ønsker å bli erstattet.
3 Legg til en annen tekstboks til skjemaet og gi den navnet "replaceBox." Legg en "Erstatt" etikett ved siden av den. Dette er den boksen der brukeren skal skrive inn ord som de ønsker å sette inn i stedet for funn ordet.
4 Legg et større tekstboks eller rik tekstboksen til skjemaet. Name it "tekstboksen". Det er der den teksten du vil søke bør limes. Alternativt kan en hvilken som helst annen kilde for tekst anvendes som gir en streng.
5 Legg til en knapp til skjemaet og endre teksten til "Go." Name it "replaceButton." Dobbeltklikk den til å lage en knapp klikk hendelse i kildekoden delen. Legg inn følgende kommando til det:
textBox.Text = textBox.Text (). Skift (findBox.Text (), replaceBox.Text ())
Dette utnyttet erstatte metoden innebygd i Visual Basic er String klassen. Counter-intuitivt imidlertid ikke den erstatte kommandoen ikke endre teksten i den opprinnelige strengen, men genererer en ny streng med utført på den operasjonen. Dette blir da satt som innholdet i tekstboksen tekstfelt.
Hint
- Den erstatter funksjon som brukes her er store og små bokstaver, så det vil bare finne forekomster av ordet som passer kapitalisering. For eksempel, hvis ordet "hallo" er i Søk-boksen det ikke vil erstatte ordene "Hei", "hei" eller "hei."
- Hvis du ønsker å utføre operasjonen i en case-insensitive mote, så kan du bruke følgende kommando i stedet:
- textBox.Text = Skift (textBox.Text, findBox.Text (), replaceBox.Text (), 1, -1, vbTextCompare)
- Med denne kommandoen vil plassere ordet "hallo" i boksen Finn erstatte varierende kapitalisering-stiler som "Hello".