Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Evitar Repetir Datos En Un ListBox
Autor Mensaje
Responder citando   Descargar mensaje 
Mensaje Evitar Repetir Datos En Un ListBox 
 
Bueno viendo lo de Evitar repetir letras, no puedo mas que pasar por aqui mi version de ese codigo solo que aplicada a una ListBox.

Code: [Download] [Hide] [Select]
PUBLIC SUB Button1_Click()

DIM ask AS String

ask = TextArea1.Text

IF ListBox1.Find(ask) > -1 THEN

Message.Info("Esta pregunta ya esta añadida")

ELSE

ListBox1.Add(ask)
TextArea1.Clear

ENDIF
END
 


Como vereis carga los datos en una variable y luego la comprueba en la ListBox, si esta manda un mensaje y si no esta la añade y vacia la TextArea.
Y para evitaros a algunos modificaciones aqui va uno sin variables:

Code: [Download] [Hide] [Select]
PUBLIC SUB Button1_Click()

IF ListBox1.Find(TextArea1.Text) > -1 THEN

Message.Info("Esta pregunta ya esta añadida")

ELSE

ListBox1.Add(TextArea1.Text)
TextArea1.Clear

ENDIF
END
 

 




===================
The best open source software in CaosG
 
Emmet - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Evitar Repetir Letras Dani26 Aplicaciones/Fragmentos de Código 1 Sabado, 19 Junio 2010, 12:26 Ver último mensaje
Emmet
No hay nuevos mensajes Tratar De Repetir El Mismo Codigo Con Todo... jousseph General 1 Domingo, 22 Agosto 2010, 18:08 Ver último mensaje
shordi
No hay nuevos mensajes Como Puedo Evitar Duplicar Datos En Mi Base willyanjose Bases de Datos 10 Jueves, 19 May 2016, 09:36 Ver último mensaje
shordi
No hay nuevos mensajes No Repetir Un Numero Aleatorio Con Rnd pittusa General 12 Martes, 18 Enero 2011, 03:03 Ver último mensaje
ivanovichenco
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario