Microsofts Visual Basic gør det nemt at opbygge dialog -baserede former. Du skal blot trække et par kontroller på formularen overfladen , tilsættes lidt kode , derefter kalde ShowDialog metode til at gøre formularen vises. Lukning af formularen er ikke helt så intuitivt. I stedet for blot at kalde de tætte metoder , rammebetingelser designere besluttede, at vi først skulle sætte DialogResult egenskaben til at returnere kontrollen til den vigtigste form , så lad denne formular kalder tæt metode. Følg disse trin for at lære den korrekte måde at lukke en dialogboks. Ting du skal
Microsoft Visual Studio eller Visual Basic Express ( 2005 eller senere )
Vis Flere Instruktioner
1

Open Visual Studio og oprette et nyt Windows-formular projekt. Klik på " File " og derefter " Nyt projekt " for at åbne den nye form vinduet. Vælg Visual Basic , Windows, Windows Form projektet og navngive den " DialogDemo ".
2

Opret en dialog formular. Klik på " Project" og derefter " Tilføj Windows Form ". Navngiv formularen " DialogForm " og klik " OK".
3

Tilføj to knapper til dialogen formularen. Klik på ikonet Værktøjskasse og trække to knapper på formularen. Højreklik på første knap og derefter vælge " Egenskaber". Når ejendommen listen vises, ændre navnet ejendom til " btnOK ", og ændre teksten ejendom til " OK". Klik på "Escape " for at lukke ejendommen vinduet. Gentag disse trin for at ændre den anden knap navn til " btnCancel " tekst til " Annuller".
4

Dobbeltklik på "OK" knappen og kodeeditoren vindue vises . Ændre koden til følgende ordlyd : Hej

Private Sub btnOK_Click ( ByVal afsender Som System.Object , ByVal e Som System.EventArgs ) Handles btnOK.Click

DialogResult = DialogResult.OK

End Sub

Indstilling af DialogResult ejendom signalerer rammerne for at overdrage kontrollen tilbage til det kaldende program . Værdien af ​​DialogResult bliver returværdien af ShowDialog metoden. Almindelige værdier er "OK", "Annuller ", " Ja", "Nej" og "Abort ". Her vender vi tilbage "OK".
5

Højreklik et vilkårligt sted på redigeringsvinduet , og vælg " Vis Designer ". Når dialogen formular vises , skal du dobbeltklikke på " Cancel " knappen derefter tilføje følgende kode : Hej

Private Sub btnCancel_Click ( ByVal afsender Som System.Object , ByVal e Som System.EventArgs ) Handles btnCancel.Click < br >

DialogResult = DialogResult.Cancel

End Sub

Her vender vi tilbage "Annuller ".
6

Right -Click Form1.vb på Solution Explorer vælg derefter " View Designer ". Den oprindelige form vil blive vist . Træk en knap fra værktøjslinjen til formularen dobbeltklik derefter på knappen. Når redaktøren vises , skal du indtaste følgende kode .

Private Sub btnTest_Click ( ByVal afsender Som System.Object , ByVal e Som System.EventArgs ) Handles btnTest.Click

Dim frm As New DialogForm

Hvis frm.ShowDialog = DialogResult.OK Så

MsgBox ( "OK" )

Else

MsgBox ( " Annulleret " )
< p> End If

frm.Close ()

End Sub

Når knappen bliver klikket på, skaber vi en ny instans af dialogen formularen , så kalder sin ShowDialog metoden . Dette åbner dialogen form og venter på brugerinput. Når en af ​​knapperne bliver klikket på, får kontrol føres tilbage til Form1 , og vi viser en meddelelse baseret på værdien af DialogResult . Efter at lukke vi formularen.
7

Klik på " F5 " for at teste programmet .