vypsání všech txt souboru do listboxu

vypsání všech txt souboru do listboxu otázka

Ahoj

potřeboval bych nějaký příkaz, aby co bylo ve složce (txt soubory) by mi to vypsalo do listboxu1, každý txt soubor = listbox item a kdyby jsem klikl na item tak aby se mi načetl txt obsah

Stačí někam nasměrovat

předem děkuji

nahlásit spam

odpovědět

Tohle by ti mělo načíst z určené složky všechny .txt soubory:

Dim dir As New IO.DirectoryInfo("c:\")
Dim files As IO.FileInfo() = dir.GetFiles()
ListBox1.Items.Clear()
For Each f As IO.FileInfo In files
    If f.Name.Contains(".txt") Then
        ListBox1.Items.Add(f)
    End If
Next

nahlásit spam

1 / 1

odpovědět

Dim dir As New DirectoryInfo("c:\")
For Each f As FileInfo In dir.GetFiles()
	If f.Extension = ".txt" Then
		listBox1.Items.Add(f.FullName)
	End If
Next

nahlásit spam

odpovědět

DotNETcollege: Mohlo by vás zajímat

MAUI - multiplatformní aplikace v .NETu

Úvod do XAML

Vyvíjíme univerzální aplikace pro Windows

Kontejnery, Docker a Azure Kubernetes Service (AKS)

TypeScript

Testování v prostředí .NET - unit testy a integrační testy

Kontinuální integrace pomocí TeamCity

Entity Framework pro pokročilé

Xamarin - vývoj multiplatformních mobilních aplikací

Javascript pro mírně pokročilé

4. 7. 2013 16:19

Michal Plško

100 395

No jde to i trochu jinak.

Dim dir As New IO.DirectoryInfo("C:\Program Files (x86)\WinRAR")
ListBox1.DisplayMember = "Name"
ListBox1.Items.AddRange(dir.GetFiles("*.txt").ToArray())

nahlásit spam

1 / 1

odpovědět

Už jsem použil ten první návod, už mám program hotový, děkuji :)

nahlásit spam

odpovědět

otázka připomínka kladné hodnocení záporné hodnocení

Nadpis:

Antispam:

Komu se občas házejí perly?

Příspěvek bude publikován pod identitou anonym.

Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.

Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

dotNETportal.cz