|
Jako první věc bych vás poprosil, abyste příště než napíšete zdrojový kód do fóra, kliknul na tlačítko VB Code a kousky zdrojového kódu vložil do příslušně označené sekce, aby se kód zvýraznil.IO.Directory.GetFiles je správně, akorát tato funkce nevrací jeden String ale pole Stringů, kde každý soubor je v jedné položce tohoto pole. Pokud chcete s proměnnou vypis pracovat jako s polem, pak použijte kód
Dim vypis() As String = IO.Directory.GetFiles(slozka)
Pokud chcete vypsat soubory jako text pod sebe (každý soubor na jednom řádku), jednodušší bude třeba toto:
Dim vypis As String = String.Join(IO.Directory.GetFiles(slozka), vbCrLf)
|