Visual Basic Tutorial : MsgBox

Funkcia MsgBox existuje ako vo Visual Basic 6.0 a Visual Basic.NET . V oboch verziách , že poskytuje jednoduchý spôsob, ako programátor zobraziť textovú správu a zahŕňať osobitné možnosti pre odpoveď užívateľa . Tieto možnosti zahŕňajú tlačidla s nápisom " OK " alebo " Áno " , " Zrušiť " , " AbortRetryIgnore " , rovnako ako ikony pre varovanie alebo informácie . MsgBox môže tiež zobraziť odkaz na súbor nápovedy. Formulár Príklad

Písanie veľmi krátky program jazyka demonštruje použitie funkcie MsgBox . Príkladom ukazuje, ako programátor môže spôsobiť celý rad akcií , ktoré sa vyskytujú v závislosti na reakcii užívateľa . Vyvolanie MsgBox môže vysporiadať s kritickými chybami , len upozorní užívateľa na niečo , alebo nechať osoba rozhodnúť , či continue.To vidieť v akcii , otvorte Visual Basic 6.0 alebo Visual Basic.NET softvér . V aplikácii Visual Basic vytvoriť nový program kliknutím na tlačidlo " Súbor " . Vyberte " Nový projekt " z rozbaľovacieho zoznamu a " Štandardné EXE " zo zoznamu šablón dole . V jazyku Visual Basic.NET alebo Visual Basic 2008 Express Edition , vytvoriť nový projekt rovnakým spôsobom , ale vyberte " Windows Forms " Vytvorte si Príkazové tlačidlo a tri štítky na formulári kliknutím a ťahaním tieto nástroje z panela nástrojov . Kliknite na štítku v dialógovom okne Vlastnosti na pravej strane , zatiaľ čo pomocou návrhového zobrazenia a vymazanie textu titulok . Stačí , aby príklad trochu viac užívateľsky prívetivé , meniť na príkazové tlačidlo titulok v zozname Vlastnosti na " Show Me " . Formulár by mal vyzerať ako na obrázku tu .
Príklad kódu

V Visual Basic 6 , kliknite na " Zobraziť " v menu a vyberte " CODE " z roletového zoznam . Zadajte nasledujúce príkazy presne tak , ako je uvedené nižšie . V Visual Basic.NET , stlačením tlačidla " F7 " sa vyvolá zobrazenie kódu . Poznámka : Visual Basic rozhranie sa automaticky vloží jazýčky na niektoré z týchto liniek , ktoré sa nezobrazujú správne v tomto článku . Nebojte sa o tom . Priložený obrázok ukazuje spôsob kódovania sa objaví v softvéri .

Private Sub Command1_Click ( ) Dim Msg , Style , Title , ResponseMsg = " Chcete pokračovať ? " Štýl = vbAbortRetryIgnore + vbCritical + vbDefaultButton2 " definovať buttons.Title = " MsgBox Demonštrácia " Response = MsgBox ( Msg , Style , hlava ) Ak odpoveď = vbAbort ThenLabel1.Caption = " Nemal si urobil ! " ElseIf Response = vbRetry ThenLabel2.Caption = " Opakovať všetko , čo chcete , nič nebude fungovať ! " " Vykonajte niektoré action.Else : Label3.Caption = " To je správna odpoveď ! " MsgBox ( " Stlačte kláves pre ukončenie tejto " ) Ak vbok ThenEndEnd IfEnd IfEnd Sub

Stlačením tlačidla " F5 " v oboch verziách bude prebiehať programu a preukázať MsgBox , ako bol vytvorený . V závislosti na potrebách aplikácie , namiesto toho , aby správy sa zobrazí , program môže mať akciám , ako je otváranie nových okien , spustenie chybovej korekcie postupy , vypnutie programu alebo rad vecí , ktoré sú možné v rámci programu .

• Predchádzajúca strana: Ako nainštalovať Windows Systémové služby 
• Ďalšia strana: Ako vytvoriť Random Access File