0

指定したディレクトリ "Application.startupPath & "\Skins" にアプリを表示するフォルダーを作成し、それらをコンボ ボックスに配置しようとしています。スピーチ マークから、アプリに何をさせたいかがわかります。 YouTube、Google、さらにはこのサイトを検索しましたが、役に立たない投稿はありません。

Dim DirectorySkins As String = Application.StartupPath & "\Skins"
Try
    Dim Dir As DirectoryInfo = DirectCast(DirectorySkins, DirectoryInfo)
    For Each DirInfo As DirectoryInfo In Dir()


    Next
Catch ex As Exception
    ToolsError.ListBox1.Items.Add(ex.Message)
End Try

しかし、私はエラーが発生しています:

タイプ 'String' の値を 'System.IO.DirectoryInfo' に変換できません

DirectCast(DirectorySkins)。エラーも表示されます:

クラス 'System.IO.DirectoryInfo' には既定のプロパティがないため、インデックスを作成できません。

このエラーはにリンクされていIn Dir()ます。このコードは YouTube のチュートリアルに基づいているため、探しているものではない場合はお知らせください。どんな助けでも大歓迎です。さらに情報が必要な場合は、喜んで提供します。

4

1 に答える 1