3
Eintrag in einer DirListBox markieren und Wert übergeben
Hi,
suche in VB eine Möglichkeit den Namen eines markierten Eintrags zu ermitteln.
D.h. ich markiere (Einfachklick) einen Eintrag in der DirListBox und möchte diesen z.B. in einer MsgBox wieder ausgeben.
Hier schon mal das was ich bisher habe:
Die DirListBox startet in einem bestimmten Verzeichnis.
Wenn ich einen Eintrag Doppelklicke kann ich mir den Pfad anzeigen lassen:
So, das ganze soll jetzt aber auch funktionieren wenn der Eintrag nur Markiert ist.
Vielleicht kann mir ja jemand sagen wie es geht !?
Gruß
SKID
suche in VB eine Möglichkeit den Namen eines markierten Eintrags zu ermitteln.
D.h. ich markiere (Einfachklick) einen Eintrag in der DirListBox und möchte diesen z.B. in einer MsgBox wieder ausgeben.
Hier schon mal das was ich bisher habe:
Private Sub Form_Load()
Drive1.Drive = "\\Servername"
Dir1.Path = "\\Servername\Freigabe"
Dir1.Path = Drive1.Drive
End SubDie DirListBox startet in einem bestimmten Verzeichnis.
Wenn ich einen Eintrag Doppelklicke kann ich mir den Pfad anzeigen lassen:
Private Sub Command1_Click()
MsgBox Dir1.Path
End Sub So, das ganze soll jetzt aber auch funktionieren wenn der Eintrag nur Markiert ist.
Vielleicht kann mir ja jemand sagen wie es geht !?
Gruß
SKID
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 49853
Url: https://administrator.de/contentid/49853
Printed on: April 20, 2024 at 01:04 o'clock
3 Comments
Latest comment
Hallo skid!
Einfach so wie bei einer gewöhnlichen ListBox:
Grüße
bastla
Einfach so wie bei einer gewöhnlichen ListBox:
MsgBox Dir1.List(Dir1.ListIndex)Grüße
bastla
Hi bastla,
Super, genau das war es
Hmmm...hat zwar mit der eigentlichen Fragestellung nix zu tun aber gibt es , so auf die schnelle, eine Möglichkeit den Doppelklick auf die einzelnen Einträge in der DirListBox zu unterbinden ?
Also so, das es nicht möglich ist in die Unterverzeichnisse zu gelangen ?
Gruß
SKID
Super, genau das war es
Hmmm...hat zwar mit der eigentlichen Fragestellung nix zu tun aber gibt es , so auf die schnelle, eine Möglichkeit den Doppelklick auf die einzelnen Einträge in der DirListBox zu unterbinden ?
Also so, das es nicht möglich ist in die Unterverzeichnisse zu gelangen ?
Gruß
SKID
Hallo skid!
Du könntest aber das Auflisten der Dateien für ganz bestimmte Ordner verhindern. Dazu könnte der Code für das "Dir1_Change"-Ereignis schematisch etwa folgenden Inhalt haben:
Damit würdest Du zB Inhalte von Ordnern, deren Pfad die Bestandteile "verboten" oder "whatever" enthält, nicht in der FileListBox anzeigen. Ob diese Vorgangsweise sinnvoll ist, musst Du selbst beurteilen.
Grüße
bastla
... das es nicht möglich ist in die Unterverzeichnisse zu gelangen ...
Eigentlich wäre das über die Sicherheitseinstellungen zu bewerkstelligen.Du könntest aber das Auflisten der Dateien für ganz bestimmte Ordner verhindern. Dazu könnte der Code für das "Dir1_Change"-Ereignis schematisch etwa folgenden Inhalt haben:
If Instr(LCase(Dir1.Path), "verboten") Then
MsgBox "Ordner nicht verfügbar ..."
ElseIf Instr(LCase(Dir1.Path), "whatever")
'oder auch gar kein Code
Else
File1.Path = Dir1.Path
End IfGrüße
bastla
