ファイルを開く方法
- ファイルを開く方法について質問があります。
- FileListBoxにファイル一覧を表示させ、選択したファイルを開く方法を教えてください。
- ダブルクリックやコマンドボタンでファイルを開く方法を知りたいです。
- ベストアンサー
ファイルを開く方法
ドライブを選択→ディレクトリを選択→FileListBoxにファイル一覧を表示されるようなもの作ってみたのですが、 わからないことがあるので質問させてください。 ファイルリストボックスに表示させているファイルを開けるようにしたいのですが、方法がわかりません。 例えば、ファイルリストボックスに ------------------- 音楽.mp3 テキスト.txt 動画.avi ------------------- と表示されていたとします。 そこで、音楽.mp3を開く場合はWinamp、テキスト.txtを開く場合はメモ帳、動画.aviを開く場合はメディアプレーヤといった感じで、 自分で設定してある(エクスプローラでダブルクリックした場合と同じ)プログラムで開けるようにしたいのです。 ダブルクリックや、ファイルを選択してからコマンドボタンで開く、といった事はできるのでしょうか？ 方法があれば是非教えてください。
- robbie001
- お礼率66% (6/9)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
ファイル名の取得がフルパスで行われているのなら （ファイル名 = 変数strTmpに格納 と仮定して） Shell "explorer.exe" & " " & strTmp, vbNormalFocus とか CreateObject("Shell.Application").ShellExecute strTmp かも？
関連するQ&A
- ファイル名がテキストボックスにうまく表示できない
お世話になります。 filelistboxで選択したファイル名を選択した順に テキストボックスに表示させたいのですが、ファイル名の 後に改行コードを入れても改行して表示してくれません。 何が原因なんでしょうか？よろしく御教授願います。 例 aaa.txtを選択、テキストボックスに表示させ、 その後bbb.txtを選択するとテキストボックスの表示が ”aaa.txt‥bbb.txt”となる --------- aaa.txt（改行） bbb.txt --------- と表示したい。 （コード） Dim fname As String Private Sub File1_Click() fname = Dir1.Path & "\" & File1.FileName End Sub Private Sub Command3_Click() Call macappend End Sub Private Sub macappend() 'text1に選択マクロを追加 Dim macbuff1 As String Dim macbuff2 As String macbuff2 = Text1.Text macbuff1 = fname + Chr(13) + Chr(11) macbuff2 = macbuff2 + macbuff1 Text1.Text = macbuff2 End Sub
- ベストアンサー
- Visual Basic
- テキストファイルへの書き込み方法について
テキストファイルがある場合は、データを読んでリストボックスに表示をさせ、追加の場合はテキストボックスに入力した項目をテキストファイルの一番後ろの 入れる事は出来ましたか？ また、テキストファイルのデータの並び方からを昇順で保存することは出来ますか？ 文章が適切ではないかもしれませんがよろしくお願いします。
- ベストアンサー
- Visual Basic
- ExcelやWordのファイル：拡張子がなくても開くのはなぜでしょうか
拡張子がなくても、Excelのファイルはダブルクリックで開きます。 それはなぜですか。 詳しく述べます。 エクスプローラ（またはデスクトップ）上に、テキストファイル（拡張子txt）があります。 このファイルの拡張子を外します。（～～.txt → ～～） このとき、 「拡張子を変更すると、ファイルが使えなくなる可能性があります。変更しますか？」 と訊いてくるので、「はい」をクリックすると、ファイルのアイコンはウィンドウズのマーク（旗みたいなもの）になります。 これは、拡張子がなくなったために、アイコンとの関連付けがなくなったからだと思います。 このファイルをダブルクリックすると、「ファイルを開くアプリケーションの選択」というウィンドウが立ち上がります。 拡張子がないから、どのアプリケーションを使うのかわからないのですね。 他方、 エクスプローラ（またはデスクトップ）で、エクセルのファイルの名前の拡張子を外します。 （～～.xls → ～～） このファイルをダブルクリックすると、エクセルが立ち上がって、ファイルが開かれます。 なぜ、エクセルの場合は、拡張子がなくても開けるのでしょうか。 ワードで作ったdocファイルでも、エクセルと同樣です。 拡張子がなくてもダブルクリックで開ける設定があるのでしょうか。 たとえ、エクセルやワードのファイルでも、txtという拡張子を付けると、テキストエディタで開く（私のPCの場合はViViというテキストエディタが設定されていますが、普通はメモ帳ですよね。）ので、拡張子がまったく無視されているわけでもないです。 （もちろん、中身は文字化けしていますけど。） Windows98SE Excel2000 Word2000
- 締切済み
- Windows 95・98
- hrefでリンクしたテキストファイルを早く開く方法
<a href=×××.txt>○○○</a>などとhrefタグでリンクしたテキストファイルが容量１００ｋを超えると開くのが遅くなり、500kなどになるとしばらくフリーズしてなかなか開けません。 直接テキストファイルをダブルクリックして開くよりもかなり時間がかかります。 ＰＣのスペックはそのままでリンク表示から早くテキストファイルを開く方法はないでしょうか？
- 締切済み
- HTML
- これらのファイルを開くときは～が記憶されない
mp3をダブルクリックするとアプリケーション選択画面が出てきて「「これらのファイルを開くときは、いつもこのアプリケーションを使う」というチェックボックスがあるのでチェックしてアプリを選ぶのですが、覚えてくれず次回も選択画面となります！どうしたら覚えてくれますか？OSは2000です。
- 締切済み
- Windows NT・2000
- ファイルを開くダイアログについて
いつもお世話になっています。 VS2005でWindowsアプリケーション作成を行っております。 ファイルを開くダイアログについて、 OPENFILENAME ofn; ofn.lpstrFilter = TEXT("テキストファイル(*.txt)\0*.txt\0\0"); 対象ファイルを上記のようにテキストファイルと指定しているとき、 ユーザがテキストファイル以外を誤って？選択してOKをクリックした場合に エラーを表示したいのですが、ユーザが選択したファイル名の拡張子が lpstrFilterと一致するか調べる方法を教えていただきたいです。 ご教授お願いいたします。
- ベストアンサー
- C・C++・C#
- 選択項目移動処理（リストボックス）
表題の件で、ご質問があります。 excel2003で、VBAのユーザフォームを使っております。 リストボックスが二つあり、左の項目を選択したら右の項目にその選択した値が移動する処理をしたいのですがまったくできません。 ＜処理内容＞ ・リストボックス１の内容 りんご text メロン トマト 上記で、りんごをダブルクリックするとリストボックス１とリストボックス２の内容は以下になります。 ＜選択後結果＞ ・リストボックス1 text メロン トマト ・リストボックス２ りんご このようにダブルクリックしたらりんごは消えてリストボックス２に移動します。 また逆の処理もしたくたとえばこの状態でリストボックス２を選択したらりんごがリストボックス１に戻る。 ＜処理内容＞ ・リストボックス２ りんご ・リストボックス1 text メロン トマト リストボックス２をダブルクリックすると以下のようになります。 ・リストボックス２ ・リストボックス1 りんご text メロン トマト このようになります。 上記二点の処理がしたいと思います。 どなた様か御教授頂けないでしょうか？ お手数お掛けしますが宜しくお願いします。
- 締切済み
- その他（プログラミング・開発）
- Windows 10 のファイル表示方法について
ウィンドウズ10を使っています。CDから音楽ファイルをMP3でダウンロードした曲がUSBに入っています。そのUSBを開くと、MP3のファイルが表示されるのではなく、フォルダーがずらっと表示され、 （アーティスト名ごとのフォルダー）そのフォルダーをクリックすると、更に今度はアルバムのフォルダーがずらった表示され、そのフォルダーを更にクリックするとやっとMP3の音楽ファイルが表示されます。このMP3ファイルが最下位の階層。 私がしたいことは、すべてのフォルダーの最下位に入っているこのMP3のファイルだけをずらっと一括で表示させたいのですが、フォルダーオプションをみても探せません（探し方がまずいのかもしれません）。 コンンピューターをクリックして、USBの入っているドライブ（Fドライブ）をクリックして、 ずらったフォルダーが表示されている状態（例えば５０のフォルダー）から、すべてのフォルダー（アーティスト名）の中のフォルダー1つのアーティストのフォルダに対して３つ～４つ（アルバム名）の更に中に入っているMP3ファイル（ＵＳＢに入っているすべてのMP3ファイルのリスト）がずらっと一括で表示される方法があれば教えてください。
- ベストアンサー
- デスクトップPC
- リストボックスで選択したデータを表示する方法
ソフトはACCESS2000です。 フォームでの入力で、リストボックスから複数選択できるようにしているのですが、このリストボックスの値集合ソースに入っている件数が多いため、下にかなりスクロールすることになります。 そこで、リストボックスの右側に別にリストボックスで選択したものを表示させられないかと思っています。 ここでお聞きしたいのは、 1. 表示エリアとしてテキストボックスを作ったのですが、テキストボックスでOKか？ 2. 1でOKの場合、リストボックスで選択したものをテキストボックスに表示させる方法 3. 1でOKの場合、そのテキストボックスへ入力できなくする方法（表示ONLYにしたい） 4. 1でだめな場合、別な方法はあるか？あればその方法 です。 回答は、1～3か、1,4になるかと思います。よろしくお願いいたします。
- ベストアンサー
- その他(データベース)
- リストボックスをクリックすると、他フォームに値代入
データベース超初心者です。VBAの知識がほとんどないので、初歩的な質問だと思いますが、よろしくお願いします。 フォームは２つ「入力」と、「コード選択」 (1)フォーム「入力」にあるテキストボックス「商品コード」をダブルクリックすると、フォーム「コード選択」を開く (2)フォーム「コード選択」にあるリストボックス「コードリスト」をダブルクリックすると、商品コードが、フォーム「入力」のテキストボックス「商品コード」に代入される。 ちなみに、コードリストは、２列で、商品コードと商品名が表示されるようになっています。 わかりにくい質問かもしれませんが、どうぞよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
お礼
解答ありがとうございます。 無事にファイルを開くことができました。ありがとうございます。 CreateObject("Shell.Application").ShellExecute strTmp を CreateObject("Shell.Application").ShellExecute file1.filename に変更したら出来ました。