** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Otros de Microsoft: Windows y Office > Visual Basic Clásico (VB3...VB6)
  Mensajes nuevos Mensajes nuevos RSS - Evitar datos duplicados listbox
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoEvitar datos duplicados listbox

 Responder Responder
Autor
Mensaje
Konanifer Ver desplegable
Habitual
Habitual
Avatar

Unido: 13/Noviembre/2007
Localización: Panama
Estado: Sin conexión
Puntos: 109
Enlace directo a este mensaje Tema: Evitar datos duplicados listbox
    Enviado: 05/Septiembre/2009 a las 18:32
como puedo evitar entradas dupplicadas en un list box este es el código
 
Private Sub Command1_Click()
For a = a To List1.ListCount
If Text1.Text = List1.List(List) Then
MsgBox "Duplicado"
Else
List1.AddItem Text1.Text
End If
Next a
End Sub
 
Pero este codigo solo me evita la entrada del primer dato y me duplica por 2 cada dato adicional que ingrese y no me envia el mensaje de duplicado.
 
 
Arriba
tokenring Ver desplegable
Habitual
Habitual
Avatar

Unido: 23/Marzo/2006
Localización: Mexico
Estado: Sin conexión
Puntos: 107
Enlace directo a este mensaje Enviado: 15/Septiembre/2009 a las 17:37
Buenas Tardes:

Seguramente no entendi bien , pero aqui pongo un ejemplo de lo que me parece que deseas hacer

For a = 0 To List1.ListCount
If Text1.Text = List1.List(a) Then
MsgBox "El dato ya existe en la lista"
Exit Sub
End If
Next a
List1.AddItem Text1.Text
End Sub

Saludos...
axl
Arriba
Antoni Ver desplegable
Habitual
Habitual


Unido: 30/Agosto/2009
Localización: Catalunya
Estado: Sin conexión
Puntos: 70
Enlace directo a este mensaje Enviado: 21/Septiembre/2009 a las 12:18
List1.Text=Text1.Text
if List1.listindex <> -1 then
msgbox "El elemento ya existe en la lista"
exit sub
endif
Arriba
Konanifer Ver desplegable
Habitual
Habitual
Avatar

Unido: 13/Noviembre/2007
Localización: Panama
Estado: Sin conexión
Puntos: 109
Enlace directo a este mensaje Enviado: 07/Octubre/2009 a las 03:59
Muchas gracias este hilo se puede cerrar
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable