Jak połączyć dwa formularze w Visual Basic

Korzystanie z metody ShowDialog

Krok 1

Otwórz Visual Basic i utwórz nowy projekt Windows Forms. Kliknij "Plik", a następnie "Nowy projekt". Kiedy pojawi się okno dialogowe Nowy projekt, wybierz "Windows" z widoku drzewa, wybierz "Windows Forms Application" typów projektów, nazwij projekt "FormSamples", a następnie kliknij OK. Pojawi się nowy formularz.

Krok 2

Przeciągnij etykietę i trzy przyciski w nowym formularzu. Kliknij etykietę i wybierz opcję "Właściwości". Nazwij etykietę "lblTitle" i wpisz "Welcome" we właściwości Text. Kliknij "ESCAPE", aby powrócić do projektanta formularzy. Powtórz procedurę dla każdego z przycisków, wprowadź "Login", "Widok" i "Zamknij" dla każdej właściwości Tekstu każdego przycisku.

Krok 3

Utwórz drugi formularz Kliknij "Projekt", a następnie "Utwórz nowy formularz Windows". Nazwij formularz "LoginForm". Przeciągnij etykietę, pole tekstowe i dwa przyciski na formularzu. Zmień właściwość Text etykiety na "Name:", nazwę pola tekstowego "txtName" i etykietę przycisku "Login" i "Anuluj".

Kliknij dwukrotnie przycisk Zaloguj, aby otworzyć okno kodu i dodać następujący kod:

DialogResult = DialogResult.OK

Kliknij opcję Widok, a następnie Projektuj, aby powrócić do widoku projektu formularza. Kliknij dwukrotnie przycisk Anuluj i dodaj następujący kod:

DialogResult = DialogResult.Cancel

Krok 4

Wróć do pierwszego formularza, kliknij okno "Form1" Eksploratora rozwiązań. Kliknij dwukrotnie przycisk Zaloguj i dodaj następujący kod:

Dim frm Jako nowy LoginForm Jeśli frm.ShowDialog = DialogResult.OK Następnie lblTitle.Text = "Welcome" & frm.txtName.Text Koniec If frm.Close ()

Ten kod tworzy nową instancję formularza logowania, a następnie użyj metody ShowDialog, aby otworzyć formularz. Po kliknięciu przycisku logowania ShowDialog zwróci DialogResult.OK, a kod skopiuje nazwę pola tekstowego w wiadomości powitalnej. Jeśli klikniesz "Anuluj", ten kod zostanie zignorowany. Metoda Close zamyka formularz okna dialogowego.

Korzystanie z metody Show

Krok 1

Utwórz kolejną formę o nazwie "ViewForm". Przeciągnij etykietę i przycisk ze skrzynki narzędziowej do formularza. Zmień właściwość Name znacznika "lblContent" i zmień właściwość Text przycisku "Zamknij".

Krok 2

Kliknij dwukrotnie przycisk "Zamknij" i dodaj następujący kod:

Zamknij ()

Krok 3

Wróć do projektanta formularzy Form1, a następnie kliknij dwukrotnie przycisk "Widok". Dodaj następujący kod:

Dim frm Jako nowy ViewForm frm.lblContent.Text = lblTitle.Text & ". Umieść zawartość tutaj." frm.Show ()

Ten kod tworzy nową instancję ViewForm. Następnie ustaw właściwość tekstową znacznika i wywołaj metodę Pokaż formularza. Zauważ, że nie istnieje metoda Close, a metoda Show nie zwraca wartości.