Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Microsoft Visual Basic Projects

Visual Basic ( VB ) je programovací jazyk používaný pre rýchly vývoj počítačových programov . Môžete si vytvoriť tieto programy do aplikácie Microsoft Word a Excel . Ak tak urobíte , môžete využiť mnoho objektov a zdrojov , z ktorých každá z týchto aplikácií má ( tj objekt ActiveDocument v programe Word alebo vstavaným - in Zoradiť Excel a Medzisúčet funkcií ) , ako protichodný k vytváraniu objektov z scratch.Try nasledujúce projekty k rozvoju svojej vizuálnej základné zručnosti a gramotnosť . Prezrite si ponuku objekt

Zadajte nasledujúci text do MS Wordu integrované vývojové prostredie ( IDE ) pre zobrazenie základnej rozsah objektu v akcii . Môžete zadať IDE z Wordu stlačením " Alt " - " F11 " . Zadajte kód do otvoreného priestoru v okne kódu. ClipArt

Public Sub spacePgp ( ) Dim r ako rozsah

Set r = Selection.Range

r.Expand wdParagraphr . insertAfter vbCrLfr.InsertBefore vbCrLf

End Sub

Vrátiť do aplikácie Word ( alt- F11 ) , keď ste napísali program , a umiestnite kurzor ( AKA kurzor ) v každom bode , najmä ten , obklopený odsekov hore a dole . Spustite program výberom Developer > makrá , výber " spacePgp " názov makra zo zoznamu a kliknutím na tlačidlo Spustiť . Makro vložky vozík vráti nad a pod odsekom s kurzora . Medzi kľúčové body v kóde vziať na vedomie sú s odkazom na výber a funkcie insertAfter a insertBefore . Výber odkazuje na umiestnenie kurzora ( AKA kurzor ) a INSERT pridať znaky konca riadku .
Vytvoriť UserForm projektu

Zadajte Visual Basic IDE ako predtým a vyberte položku Vložiť > UserForm . Na novej podobe , pretiahnite dve príkazové tlačidlá z panela nástrojov . V table Vlastnosti zmeniť názov jedného tlačidla na " modrú " , druhý " žltý " . Double - kliknite na tlačidlo " žltý " a zadajte tento programový kód pre udalosť CommandButton2_Click :

Private Sub CommandButton2_Click ( ) Set r = Selection.Ranger.Expand ( wdSentence ) r.HighlightColorIndex = wdYellowEnd Sub

Duplicitné tlačidlá v programe kód

Opíšte kód pre CommandButton2_Click funkcie ( ) do schránky a vložte vyššie uvedený kód prvom stupni funkcie , nad líniu " Private Sub CommandButton2_Click ( ) . " Zmeňte duplicitné CommandButton2_Click čítať CommandButton1_Click , a zmeniť wdYellow na wdBlue . ClipArt

Navigovať do inej časti kódu na tomto dokumente tým , že najprv presunutím kurzora na paneli projektu . Rozbaľte priečinok Microsoft Word objekt tým , že na neho kliknete . Ak existuje niekoľko zložiek s názvom Microsoft Word objekt , vyberte si ten , objaviť sa pod názvom dokumentu , ktorý chcete makro spustiť palcov Napríklad , ak testujete svoj ​​program na texte obsiahnuté v dokumente " MacroStudy , " zložka Ak chcete rozšíriť kliknutím na jeho znamienko plus ( + ) znamienko bude vyzerať takto :

Project ( MacroStudy ) + Microsoft Word Objects
písať kód , ktorý načíta formulár

Dvakrát kliknite na ikonu ThisDocument , ktorá sa zobrazí po rozbalení Microsoft Word Objects zložku . Táto akcia sa dostanete na iné kódové okno , kde budete zadajte kód , ktorý sa zobrazí formulár , ktorý ste vytvorili . Toto je kód pre vstup :

Public Sub colorForm ( ) UserForm1.ShowEnd Sub

Vrátiť do aplikácie Word a umiestnite kurzor do ľubovoľnej vety v texte dokumentu . Spustite program výberom Developer > makrá , a potom výberom " colorForm " , potom stlačte tlačidlo Spustiť . Zobrazí sa vaša forma . Kliknite buď na jeho modrým alebo žltým tlačidlom a pozerať sa na vetu obsahujúce farbu kurzor zmeniť .

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené