USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic.Net    (ActiveX/Controles/DLL)

Título da Dica:  Incluindo um item não existente no controle ListBox
Postada em 9/10/2003 por ~Ð@®£@Ñ            
Esta dica vai mostrar como incluir itens em um controle ListBox. Somente novos itens poderão ser incluídos , se o item já existir uma mensagem avisando o usuário será exibida.

- Inicie um novo projeto no Visual Studio.NET com as seguintes características (sinta-se a vontade para alterar a seu gosto.)

Project Types : Visual Basic Projects
Templates : Windows Application
Name : IncluiListBox
Location : c:\vbnet

- Insira no formulário :
um botão de comando - Button1
um controle TextBox1
um controle ListBox1
Obs: Os itens exibidos foram incluídos diretamente via propriedade itens (colletions) ...


- No evento Click do componente Button1  insira o código abaixo:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


If ListBox1.FindStringExact(TextBox1.Text) = ListBox.NoMatches Then
          ListBox1.Items.Add(TextBox1.Text)

          TextBox1.Text = ""

          TextBox1.Focus()
Else
          MsgBox("Este Item já existe no ListBox")
End If

End Sub

Código para Button1

- Agora Execute e veja o resultado

Um item existente não será incluido Incluindo um novo item

Até a próxima....
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página