No.1ベストアンサー
- 回答日時:
複数選択ダイアログ属性にしたときは、
※ファイルを1つ選択したとき
複数選択属性を持たないダイアログと同様に扱えます。
※ファイルを複数選択したとき
vbNullChar区切りで パス/ファイル名1/ファイル名2/ファイル名3・・・・
といったように値が返されます。
サンプルは環境を書いてなかったので、VB6用です。
Splitが使えないバージョンのVBであれば、参考URLを元に読み替えてください。
Dim i As Long
Dim valWork As Variant
Dim strPath As String
' CancelError プロパティを真 (True) に設定します。
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
' Flags プロパティを設定します。
CommonDialog1.Flags = cdlOFNHideReadOnly Or cdlOFNAllowMultiselect Or cdlOFNExplorer
' リスト ボックスに表示されるフィルタを設定します。
CommonDialog1.Filter = "すべてのファイル (*.*)|*.*|" & _
"テキスト ファイル (*.txt)|*.txt|" & _
"バッチ ファイル (*.bat)|*.bat"
' "テキスト ファイル" を既定のフィルタとして指定します。
CommonDialog1.FilterIndex = 2
' [ファイルを開く] ダイアログ ボックスを表示します。
CommonDialog1.ShowOpen
valWork = Split(CommonDialog1.FileName, vbNullChar)
If UBound(valWork) = 0 Then
Debug.Print valWork(0)
Else
strPath = valWork(0)
If Not (Right(strPath, 1) = "\") Then strPath = strPath & "\"
For i = LBound(valWork) + 1 To UBound(valWork)
Debug.Print strPath & valWork(i)
Next i
End If
Exit Sub
ErrHandler:
' ユーザーが [キャンセル] をクリックしました。
Exit Sub
参考URL:http://oshiete1.goo.ne.jp/kotaeru.php3?q=221365
No.4
- 回答日時:
No.1の人の言うように、CommonDialogって複数選択出来るんですね。
知らなかった・・・というわけで、私の回答は無視して下さい。
では。
No.3
- 回答日時:
ダイアログボックスってコモンダイアログですよね?
ファイルの名前が取れているのであれば、
1つ目のファイルをOpen→処理→Close
2つ目の…
とやるのでは駄目なのでしょうか?
もし、同時に開きたいのであれば、
intFileNo = FreeFile
で、使用可能なファイル番号が取得できますので
intFileNo = FreeFile
Open path For mode As intFileNo
・
・
・
という感じでファイルを開けていけば、同時に複数ふぃ有るを扱う事が出来ますよ。
No.2
- 回答日時:
こんにちは。
maruru01です。ダイアログボックスって、CommonDialogですか?
それは出来ないんじゃないでしょうか(私には方法が思いつきません)。
ご自分で、選択用ダイアログを作ってそれを表示させるということでしょうか?
またテキストボックスに複数で表示させるというのは、どういうことでしょうか?
1つのテキストボックスに、複数のファイルの内容を表示させるということでしょうか?それなら、文章をつなげるだけですが。
何をやろうとして、どういう風にうまくいかないのかを、もう少し詳しく説明していただけないでしょうか。
ちなみに蛇足ですが、このカテゴリーなので、VBなのでしょうが、バージョンとかOSとかを書いておくといいと思いますよ、こういうコンピュータ関係の質問は。
では。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
binファイルを解凍したいの...
-
.NETアプリを作ったときの .man...
-
アクセス 壊れた? 「ファイ...
-
jarファイル
-
コマンドプロンプトで作成日時...
-
htcファイルとはなんですか?
-
exeファイルの中身を見る方法は...
-
自分で作成した重要ファイルを...
-
VBSが起動しない
-
#include <Windows.h>というヘ...
-
ADODB.Streamで開いたファイル...
-
C言語---ファイルに出力したデ...
-
Latexで図番号だけを「図1.1」...
-
ファイルが開かれているかどう...
-
VB.NET ファイルの種別取得方法
-
リンクの張り付けかたを教えて...
-
バッチ処理で追記コピーしたい
-
ファイル名にドットを使ったフ...
-
「ブルーファイル」と「グリー...
-
Batファイルをバイナリ形式にす...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
binファイルを解凍したいの...
-
アクセス 壊れた? 「ファイ...
-
コマンドプロンプトで作成日時...
-
公文書のxmlファイルの開き方が...
-
#include <Windows.h>というヘ...
-
.NETアプリを作ったときの .man...
-
exeファイルの中身を見る方法は...
-
jarファイル
-
自分で作成した重要ファイルを...
-
Seasar2のdiconファイルの読み方
-
VBAでのicsファイル変換
-
バッチ処理で追記コピーしたい
-
監視ツールを入れさせられまし...
-
参照するファイルをワイルドカ...
-
「ブルーファイル」と「グリー...
-
HTMLからのBATファイル実行
-
Latexで図番号だけを「図1.1」...
-
C言語---ファイルに出力したデ...
-
Windowsのエクスプローラーでフ...
-
warファイルをEclipseでプロジ...
おすすめ情報