Migrar dados de um Formulário Children X Formulário Comum
Pessoal, Boa tarde.
Acontece o seguinte.
Tenho um formulário padrão MDI, certo?
Nele tem um ToolStrip que contem alguns botões, sendo um deles INCLUIR EMPRESA.
Este incluir empresa é chamado da seguinte forma:
Private Sub EMPIncluirToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles EMPIncluirToolStripMenuItem.Click
ExibirFormularioFilho(New IncluirEmpresa)
EMPIncluirToolStripMenuItem.Enabled = False
End Sub
Sendo que o ExibirFormularioFilho está na seguinte SUB:
Private Sub ExibirFormularioFilho(formulario As Form)
formulario.MdiParent = Me
formulario.Show()
End Sub
Ok, sendo assim o meu formulário INCLUIR EMPRESA é chamado (dentro do formulário principal MDI).
Nele tenho basicamente um TabControl, com 3 abas, sendo uma delas CONTATO.
Na aba contato (1), tenho 3 DataGridView (um para Telefone, outro para Email e o ultimo para Site) e para cada um desses Grids tenho um botão para adicionar.
No caso, cada um desses adicionar abre um formulário:
Private Sub AdicionarTelefoneButton_Click(sender As System.Object, e As System.EventArgs) Handles AdicionarTelefoneButton.Click
AdicionarTelefoneForm.ShowDialog()
End Sub
Certo, até aqui OK. Eu tenho os campos referentes à telefone, mas na hora de salvar e já enviar para o IncluirEmpresas.DataGridView, o sistema não acusa nenhum erro, mas não grava os dados, veja o código do SALVAR:
Private Sub SalvarButton_Click(sender As System.Object, e As System.EventArgs) Handles SalvarButton.Click
IncluirEmpresa.TelefoneDataGridView.Rows.Add(AreaMaskeredText.Text, DDDText.Text, TelefoneTextBox.Text, RamalTextBox.Text, CodigoDepartamentoTextBox.Text, DepartamentoTextBox.Text, ResponsavelTextBox.Text, ObservacoesTextBox.Text)
MessageBox.Show(String.Format("Telefone incluído com sucesso!{0}{0}Telefone: ({1}) {2}.", vbCrLf, DDDTextBox.Text, TelefoneTextBox.Text), "Operação Realizada", MessageBoxButtons.OK, MessageBoxIcon.Information)
Formulario.LimparFormularios(Me)
MyBase.Close()
IncluirEmpresa.TelefoneDataGridView.CurrentCell = IncluirEmpresa.TelefoneDataGridView.Rows(IncluirEmpresa.TelefoneDataGridView.Rows.Count - 1).Cells(IncluirEmpresa.TelefoneDataGridView.Columns.Count - 1)
IncluirEmpresa.TelefoneDataGridView.Focus()
End Sub
Para facilitar a visualização, estou postando um printscreen da dela para dar uma ilustrada.
Pelo que entendi preciso fazer algum código para chamar o formulário INCLUIR EMPRESA que já existe e está aberto....
/applications/core/interface/imageproxy/imageproxy.php?img=http://oi43.tinypic.com/cl1ue.jpg&key=f629ef7721c069f6b09fe39137fbec93258aecf70b62651d3218b544b9e5c73c" alt="cl1ue.jpg" />
Discussão (3)
Carregando comentários...