Como conectar dois formulários no Visual Basic

Usando o método ShowDialog

Passo 1

Abra o Visual Basic e crie um novo projeto Windows Forms. Clique em "Arquivo" e depois em "Novo Projeto". Quando a caixa de diálogo New Project for exibida, selecione "Windows" na exibição em árvore, selecione "Windows Forms Application" dos tipos de projeto, nomeie o projeto "FormSamples" e clique em OK. Um novo formulário será exibido.

Passo 2

Arraste um rótulo e três botões no novo formulário. Clique no rótulo e escolha a opção "Propriedades". Nomeie o rótulo "lblTitle" e digite "Welcome" na propriedade Text. Clique em "ESCAPE" para retornar ao designer do formulário. Repita o processo para cada um dos botões, digite "Login", "View" e "Close" para cada propriedade Text de cada botão.

Passo 3

Crie um segundo formulário Clique em "Projeto" e depois "Criar novo formulário do Windows". Nomeie o formulário "LoginForm". Arraste um rótulo, um campo de texto e dois botões no formulário. Altere a propriedade Text do rótulo para "Name:", o nome do campo de texto "txtName" e o rótulo do botão "Login" e "Cancel".

Clique duas vezes no botão Login para abrir a janela de código e adicione o seguinte código:

DialogResult = DialogResult.OK

Clique em Exibir e Design para retornar à visualização de design do formulário. Clique duas vezes no botão Cancelar e adicione o seguinte código:

DialogResult = DialogResult.Cancel

Passo 4

Volte para o primeiro formulário, clique na janela "Form1" do Solution Explorer. Clique duas vezes no botão Login e adicione o seguinte código:

Dim frm Como Novo LoginForm Se frm.ShowDialog = DialogResult.OK Em seguida, lblTitle.Text = "Bem-vindo" & frm.txtName.Text End If frm.Close ()

Esse código cria uma nova instância do formulário de login e usa seu método ShowDialog para abrir o formulário. Se o botão de login for clicado, ShowDialog retornará DialogResult.OK e o código copiará o nome do campo de texto na mensagem de boas-vindas. Se você clicar em "Cancelar", este código será ignorado. O método Close fecha o formulário de diálogo.

Uso do método Show

Passo 1

Crie outro formulário chamado "ViewForm". Arraste um rótulo e um botão da caixa de ferramentas para o formulário. Altere a propriedade Name da tag "lblContent" e altere a propriedade Text do botão "Fechar".

Passo 2

Clique duas vezes no botão "Fechar" e adicione o seguinte código:

Fechar ()

Passo 3

Volte para o designer de formulários do Form1 e clique duas vezes no botão "Visualizar". Adicione o seguinte código:

Dim frm As New ViewForm frm.lblContent.Text = lblTitle.Text & ". Coloque o conteúdo aqui." frm.Show ()

Este código cria uma nova instância do ViewForm. Em seguida, você define a propriedade text da tag e chama o método Show do formulário. Observe que não há nenhum método Close e o método Show não retorna um valor.