---
title: "Visa alla filer i en mapp på skärmen?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/189687-visa-alla-filer-i-en-mapp-på-skärmen"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "Dr-man"
published: "2012-04-29T12:03:38.000Z"
updated: "2012-04-29T22:14:34.000Z"
replies: 1
views: 687
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/189687-visa-alla-filer-i-en-mapp-på-skärmen"
---

# Visa alla filer i en mapp på skärmen?

## #1 — Dr-man, 2012-04-29T12:03Z

Hur får jag med följande Visual Basic 2010 kod, så att filer i det aktuella
mappen visas på skärmen med hjälp av MsgBox eller motsvarande?

```
        Dim WinDirPath As String = FileIO.FileSystem.GetParentPath(Environment.GetFolderPath(Environment.SpecialFolder.System))
        Dim FileList As System.Collections.ObjectModel.ReadOnlyCollection(Of String)

        WinDirPath = LabelOption4.Text + "\" + DirTreeView.SelectedNode.Text
        FileList = FileIO.FileSystem.GetFiles(WinDirPath)

        MsgBox(FileList.ToString)
```

Permalänk: https://www.webforum.nu/p/189687

## #2 — Snubben, 2012-04-29T22:14Z

> **[Dr-man skrev:](https://www.webforum.nu/p/1550122)**
>
> Hur får jag med följande Visual Basic 2010 kod, så att filer i det aktuella
> mappen visas på skärmen med hjälp av MsgBox eller motsvarande?
>
>
> ```
>         Dim WinDirPath As String = FileIO.FileSystem.GetParentPath(Environment.GetFolderPath(Environment.SpecialFolder.System))
>         Dim FileList As System.Collections.ObjectModel.ReadOnlyCollection(Of String)
> 
> 
>         WinDirPath = LabelOption4.Text + "\" + DirTreeView.SelectedNode.Text
>         FileList = FileIO.FileSystem.GetFiles(WinDirPath)
> 
>         MsgBox(FileList.ToString)
> ```

Du måste använda en method för att slå ihop strängarna i FileList. Det är en ReadOnlyCollection(Of String), så ett sätt är att omvandla den till en Array och sedan slå ihop den med String.Join().

```
        Dim WinDirPath As String = FileIO.FileSystem.GetParentPath(Environment.GetFolderPath(Environment.SpecialFolder.System))
        Dim FileList As System.Collections.ObjectModel.ReadOnlyCollection(Of String)

        FileList = FileIO.FileSystem.GetFiles(WinDirPath)

        Dim Files As String = String.Join(vbNewLine, FileList.ToArray())

        MsgBox(Files)
```

Eller med en funktion som listar filer direkt till en Array:

```
        Dim WinDirPath As String = FileIO.FileSystem.GetParentPath(Environment.GetFolderPath(Environment.SpecialFolder.System))

        Dim FileList As String()

        FileList = System.IO.Directory.GetFiles(WinDirPath)

        Dim Files As String = String.Join(vbNewLine, FileList)

        MsgBox(Files)
```

Permalänk: https://www.webforum.nu/p/2297998

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/189687-visa-alla-filer-i-en-mapp-på-skärmen