Como acessar objetos de um Usercontrol através de um Form

Question

Eu criei um projeto que contém um Form e um UserControl. Nesse UserControl há uma ListView, e no Form há uma TextBox e um Botão. Eu gostaria de que ao colocar um texto na TextBox e clicar no Botão, adicionasse um Item na ListView do UserControl. Será que é possível fazer isso?

OBS: Uso Visual Basic 2010 Express

Answer 1

Olá Samuel_4628

Você pode adicionar este método na sua UserControl, 

public void Inserir(string sValor)
{
   ListViewItem listViewItem1 = new ListViewItem();
   listViewItem1.Text = sValor;
   this.listView1.Items.Add(listViewItem1);
}

No seu FORM no botão deixa desta forma

private void button_Click(object sender, EventArgs e)
{
   userControl11.Inserir(txtValor.ToString());
}

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 2

Queria em VB.NET, mas tá bom.

É só converter para VB.NET

Answer 3

Me desculpe Samuel_4628

Mas a alteração é bem simples!

Qualquer coisa é só chamar!

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 4

Blz!

Answer 5

Converti para VB.NET e ficou assim:

Public Sub Inserir(sValor As String)
Dim listViewItem1 As New ListViewItem()
listViewItem1.Text = sValor
Me.listView1.Items.Add(listViewItem1)
End Sub

Private Sub button_Click(sender As Object, e As EventArgs)
userControl11.Inserir(txtValor.ToString())
End Sub

Porém deu erro na seguinte parte: userControl11.Inserir Dizendo o seguinte: Reference to non-shared member requires a object reference.

O que faço?

Answer 6

O seu userControl esta com este mesmo nome?

userControl11

Coloca o nome do seu userControl!

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 7

O nome do UserControl é: UserControl3

Answer 8

Então altera para o nome do seu componente!

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 9

Eu fiz isso. Mas mesmo assim dá erro

Link da imagem mostrando o erro:

https://social.msdn.microsoft.com/Forums/getfile/994348

Answer 10

Samuel_4628

Verifica se na tela do usercontrol voce esta utilizando como string, valida os nomes, pois isso funciona com certeza!

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 11

Dá uma olhada

https://social.msdn.microsoft.com/Forums/getfile/994354

OBS: Peço paciência pois sou meio leigo.

Answer 12

Samuel_4628

No seu FORM verifica quais os nome referente userControl existe?

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 13

Referente ao UserControl é a: Private Sub UserControl3_Load

Answer 14

Samuel_4628

Para poder te ajudar realmente, precisaria ver o código!

Se você quiser, poderiamos marcar um horario e faria um acesso remoto para poder te ajudar!

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 15

Você comentou que o nome do seu UserContorl é UserContorl3, vai la no click do botão e verifica se existe algo 

UserContorl3X - Sendo o X qualquer outro numero!

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais

Answer 16

Se você quiser eu posso te enviar a parte do código para você examinar. O que você acha?

Answer 17

Eu gosto de trabalhar com `events`, um exemplo:

Crie no Form1 um evento:

Public Class Form1
    Public Event NewName(ByVal name As String)
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        RaiseEvent NewName(TextBox1.Text)
    End Sub
End Class

A partir disso tem um botão que ao clicar vai chamar o evento criado,  que agora deve ser implementado na ListView da seguinte forma:

Public Class UserControlListView
    Private Sub UserControlListView_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ListViewList.Columns.Add("Nomes")
        ListViewList.View = View.Details
        ListViewList.FullRowSelect = True
        ListViewList.GridLines = True
        //implementando o evento nessas duas linhas e no método logo abaixo
        Dim frm As Form1 = DirectCast(ParentForm, Form1)
        AddHandler frm.NewName, AddressOf NewName
    End Sub
    Private Sub NewName(name As String)
        ListViewList.Items.Add(name)
    End Sub
End Class

Pronto com isso você pode trabalhar enviando informações de um controle para o outro.

---

Fulvio C

Answer 18

Não deu certo mas beleza eu tento de outra forma

Answer 19

Acho que vou fechar o tópico

Answer 20

Olá Samuel_4628

Acabei de fazer o código em VB.NET

Public Class UserControl1

    Private Sub UserControl1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Public Sub Inserir(ByVal valor As String)
        Dim listViewItem As New ListViewItem()
        listViewItem.Text = valor
        Me.ListView1.Items.Add(listViewItem)
    End Sub

End Class

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        UserControl11.Inserir(TextBox1.Text)
    End Sub
End Class

---

Se ajudei Vote como Útil, se resolvi seu problema clique em Marcar como Resposta.

---

Daniel Ribeiro Arrais
Consultor Sênior
Site: www.danielarrais.com.br
Linkedin: http://www.linkedin.com/in/danielarrais
E-mail: [e-mail]
Skype: dani.arrais