indexOf関数で１文字ではなく7文字などを対象にした場合は? (ID:114247)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 察するに http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200406/04060116.txt の内容の続きかと思いますが・・・ プレイリスト（*.m3u）は相対パスで記述しなくても構わないと思います。 Form1上に１つボタンを配置し以下のコードを追加してください。 Private path As String Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click With FolderBrowserDialog1 .Description = "プレイリストに追加するファイルを含むフォルダーを選択して下さい。" .ShowNewFolderButton = False .SelectedPath = "" .ShowDialog() End With With SaveFileDialog1 .FileName = "" .Filter = "プレイリスト (*.m3u)|*.m3u" .ShowDialog() path = .FileName Shell("cmd.exe /c dir /B /S """ + FolderBrowserDialog1.SelectedPath + """ > """ + SaveFileDialog1.FileName + """") MessageBox.Show("プレイリストの出力完了！！" + vbCrLf, "メッセージ") End With End Sub 意図が異なっていたらゴメンナサイ。