Visual Basic tradisjonelle Windows-skjema prosjekter har to metoder for å åpne nye former. The Show Dialog metoden åpner det andre skjemaet i dialogboksen modus , suspenderes den første formen før brukeren svarer på det andre skjemaet . Denne type skjema fungerer godt for å logge inn, akseptere innstillinger eller gjennomføre en dialog med brukeren. The Show metoden åpner andre formen uavhengig, slik begge former for å kjøre parallelt. Du trenger
Microsoft Visual Basic Express 2010 eller Microsoft Visual Studio 2010
Vis flere instruksjoner
Bruke ShowDialog Method
en
Åpne Visual Basic og skape en ny Windows-skjema prosjektet. Klikk på "File " og deretter " New Project" . Når dialogboksen Nytt prosjekt kommer opp velger du "Windows" fra treet visning, velger "Windows Forms Application " fra prosjekttyper , navngi prosjektet " FormSamples ," klikk OK. En ny form vises.
2
Dra en etikett og tre knapper på det nye skjemaet . Høyreklikk på etiketten og velg " Properties". Navngi etiketten " lblTitle " og skriv " Velkommen " i Text-egenskapen . Klikk på " ESC " for å gå tilbake til skjemaet designer . Gjenta prosessen for hver av knappene hvis du skriver " Logg inn ", " Vis" og "Lukk" for hver knapp er Text-egenskapen .
3
Lag en annen form . Klikk "Project " og deretter " Opprett ny Windows-skjema . " Navngi skjemaet " LoginForm . " Dra en etikett , tekstboks og to knapper på skjemaet . Endre teksten eiendom på etiketten til "Name : " navnet på tekstboksen " txtName " og merke knappene " Logg inn " og "Avbryt ".
Dobbeltklikk på knappen Logg inn for å åpne koden vindu og legge til følgende kode :
DialogResult = DialogResult.OK
Klikk på Vis deretter Design for å gå tilbake til skjemaet utformingsvisning . Dobbeltklikk på Avbryt-knappen og legge til følgende kode :
DialogResult = DialogResult.Cancel
4
Gå tilbake til det første skjemaet ved å klikke på " Form1 " i Solution Explorer-vinduet . Dobbeltklikk på Logg inn-knappen og legge til følgende kode :
Dim frm As New LoginForm
p Hvis frm.ShowDialog = DialogResult.OK Deretter
lblTitle.Text = "Velkommen" og frm.txtName.Text
End If
frm.Close ( )
Denne koden oppretter en ny forekomst av login skjemaet bruker deretter sin ShowDialog metode for å åpne skjemaet . Hvis påloggingen klikkes , returnerer ShowDialog DialogResult.OK og koden kopierer navnet fra tekstboksen i velkomstmeldingen . Hvis "Avbryt" blir klikket , er denne koden ignorert . Lukk metoden lukker dialogen skjemaet.
Bruke Show Method
5
Lag en annen form kalt " ViewForm . " Dra en etikett og en knapp fra verktøykassen på skjemaet . Endre Name-egenskapen for etiketten til " lblContent " og endre tekst eiendommen av knappen for å
6
Dobbeltklikk på "Lukk" -knappen og legge til følgende kode " Close". :
Close ( )
7
Tilbake til skjemaet designer for Form1 dobbeltklikk deretter på "View "-knappen . Legg til følgende kode : " . . Place innhold her "
Dim frm As New ViewForm
frm.lblContent.Text = lblTitle.Text og selg
frm.Show ( )
Denne koden oppretter en ny forekomst av ViewForm . Det setter deretter teksten eiendom av etiketten og kaller skjemaet show metode. Merk at det er ingen Lukk metoden og Show metoden ser ikke for en retur verdi.