Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Listbox übergabe ohne doppelte einträge

Frage Entwicklung VB for Applications

Mitglied: copro

copro (Level 1) - Jetzt verbinden

05.03.2006, aktualisiert 07.03.2006, 7268 Aufrufe, 2 Kommentare

Hallo zusammen

ich habe zwei Listboxen bei der Übergabe soll geprüft werden ob der Eintrag vorhanden ist, aber irgentwie funktioniert es nicht so wie ich es will.

Bei einzelnen Markierungen ist es ja kein Problem, aber bei Mehrfachauswahl verhält es sich komisch....

For t = 0 To filDatei.ListCount - 1
If filDatei.Selected(t) = True Then
If InStr(lstDateien.Text, filDatei.List(t)) = 0 Then
lstDateien.AddItem filDatei
Else
MsgBox "bereits ausgewählt!"
End If
End If
Next t

Thx und MfG

Copro
Mitglied: PLONK
06.03.2006 um 20:46 Uhr
Hallo,
versuchs mal so:

Dim bExit As Boolean
Dim i As Long
Dim t As Long

For t = 0 To filDatei.ListCount - 1
If filDatei.Selected(t) = True Then
bExit = False
For i = 0 To lstDateien.ListCount - 1
If lstDateien.List(i) = filDatei.List(t) Then
MsgBox filDatei.List(t) & " ist bereits ausgewählt!"
bExit = True: Exit For
End If
Next i

If Not bExit Then lstDateien.AddItem filDatei
End If
Next t


mfg
PLONK
Bitte warten ..
Mitglied: copro
07.03.2006 um 14:25 Uhr
Danke hat wundebar geklappt =)
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Heiß diskutierte Inhalte
DSL, VDSL
gelöst DSL 200m verlängern (15)

Frage von Angela44 zum Thema DSL, VDSL ...

LAN, WAN, Wireless
Per Script auf UniFi-controller zugreifen und WPA2-Key ändern (11)

Frage von Winfried-HH zum Thema LAN, WAN, Wireless ...

Windows Server
SBS 2011 Standard virtualisieren (11)

Frage von HeinrichM zum Thema Windows Server ...

Exchange Server
gelöst DHCP Sever MS Server 2012 Problem (10)

Frage von Florian86 zum Thema Exchange Server ...