Du kan observere og sætte skriftstørrelser af tekst i din VBA -programmer ved at bruge " Skrifttype" og "Størrelse" egenskaber i disse programmer. VBA kan du ændre skriftstørrelser af formular-kontroller og dokumentets tekst , inklusive indhold i regneark , Word-dokumenter og præsentationer. Hvis du vil ændre skriftstørrelsen for et bestemt VBA objekt , søge i VBA objekt model for at objekts skrift og størrelse egenskaber. Vær forsigtig , når du ændrer skriftstørrelsen. Gør tekst for lille gør det ulæselige . Gør det for stort gør tekstindtastning besværlig. Det kan også distrahere brugere fra andre dele af dit program , såsom oplysninger om et dias eller regneark behov for at bruge programmet. Instruktioner
1
Klik din ansøgning "Udvikler " fanen, og klik derefter på "Visual Basic " knappen for at komme ind i VBA programmering miljø . Klik på " Indsæt" menuen , og klik derefter på " UserForm " element for at indsætte en ny formular. Denne form kan holde kontrol , hvis font egenskaber, du kan ændre med VBA udsagn.
2
Klik på "Vis " i menuen, og klik derefter på " Toolbox" element for at vise en palet af kontrol. Klik på værktøjspaletten ikon formet som de to tegn "AB" for at indlæse tekstboks , og derefter trække den UserForm for at oprette en tekstboks.
3
Klik værktøjspaletten ikon formet som en knap for at indtaste button- tegning tilstand, og derefter trække på lærredet under tekstboksen , du rustet til at oprette en knap til formularen .
4
Dobbeltklik på knappen for at vise begivenhed funktion for klikhændelsen . Denne funktion udfører , når din programmets brugeren trykker på knappen , du placeres i formularen . Skriv følgende udsagn i kodningen vinduet. Disse udsagn læse fra og skrive til " Size" egenskab af tekstboksen . Skrivning til denne egenskab giver dig mulighed for at ændre skriftstørrelsen af tekst indtastet i tekstboksen.
Private Sub CommandButton1_Click () Hvis TextBox1.Font.Size > 5 ThenTextBox1.Font.Size = 2ElseTextBox1.Font . size = 20End IfEnd Sub
5
Tryk på " F5 " for at køre programmet , og derefter skrive noget tekst i tekstfeltet . Klik på knappen flere gange , opdager størrelsen af teksten i tekstboksen , som ændrer stiger eller falder med hver museklik.