Tekstruter er grafiske verktøy som Word-brukere setter inn tekst i for enkel plassering på en side . Disse verktøyene brukes ofte for å lage skjemaer som jobbsøknader. Slette tekstbokser er vanligvis så enkelt som å slette andre objekter i Word , slik som ellipser eller Word art . Men hvis tekstboksen er skjult , er spesielle metoder for å lokalisere den før du kan slette den. Ved hjelp av Visual Basic til å slette tekstbokser introduserer deg til å utvide Word funksjonalitet gjennom dette programmeringsspråket . Instruksjoner
en
åpne Word , og trykk deretter på "Control " og " N " for å starte et nytt dokument .
2
Klikk på " Insert"-menyen overskriften , klikk deretter på "Tekst boks "-knappen i "Text "-panelet . Word vil vise en tekstboks med instruksjoner for bruk av tekstboksen .
3
Type over instruksjonstekst med teksten du ønsker. Dette vil hjelpe deg å huske innholdet i tekstboksen , som vil gjøre å finne og slette det lettere.
4
Klikk på "View "-menyen overskriften , klikk deretter på "Print Layout" -knappen på " Document Views "panel .
5
Klikk på " Zoom "-knappen , og skriv " 100 " for zoomeprosenten . Dette lar deg se grensene til side , som du må flytte tekstboksen utenfor siden.
6
Klikk på en av teksten boksens kanter , så dra den av siden, slik at det er usynlig . Tekstboksen nå ikke kan slettes fordi du ikke kan velge det.
7
Trykk "Alt " og deretter " F11 " for å gå inn i Visual Basic utviklingsmiljø . " VB " refererer til " Visual Basic" fra dette punktet .
8
Klikk på " Insert"-menyen overskriften , klikk deretter på " Module" element. Dette setter inn et nytt vindu for å legge inn en liten VB program som vil slette tekstboksen
9
Lim inn følgende program inn koden vinduet: .
Sub DeleteTextBox ( )
Dim x
Dim s
For x = 1 To ActiveDocument.Shapes.Count
Set s = ActiveDocument.Shapes ( x )
Stopp
Neste x
End Sub
10
Trykk " F5 " for å kjøre programmet . Programmet vil løpe til den treffer "Stop " statement.
11
Klikk på "Direkte "-vinduet og skriv inn " Print ActiveDocument.Shapes.Count . " VB vil vise " 1 ", som betyr at dokumentet har en tekstboks .
12
Klikk på "Direkte "-vinduet , og skriv "Print s.alternativeText . " Vinduet vil vise teksten du skrev inn i tekstboksen i et tidligere trinn. Dette identifiserer tekstboksen at du vil slette
13
Skriv inn følgende i " Immediate " vinduet : ". ActiveDocument.Shapes ( 1 ) Slett . ".
14 < p > Gjenta steg 11 for utskrift av antall tekstbokser i dokumentet. VB vil vise " 0 ", som indikerer at du har slettet alle tekstbokser .