Programación General > Visual Basic para principiantes

 No Repetir Items En Un Listbox

(1/1)

Javochin:
Hola a todos:

El Codigo qeu he hecho es el siguiente:

--- Código: Text ---Tramite As StringAgregado as BooleanGridTab2=DBGridLstTramites=ListBox  Tramite = GridTab2.Columns(0).TextFor i = -1 To LstTramites.ListCount            If Tramite = LstTramites.Text Then              Agregado = False            Else                      Agregado = True        End IfNext i  If Agregado = True Then             LstTramites.AddItem TramiteElse             MsgBox "El Trámite ya fué agregado", vbInformationEnd If 
Espero su Colaboración

Navegación

[0] Índice de Mensajes