ファイルの情報を取得するには？

学生 2005-12-19 11:14:00 No: 93289

今学校でVisualBasic6.0を使ってカレンダーのプログラムを作っています。
VisualBasic6.0を使うのは初めてです。
フォーム１にカレンダー本体を。フォーム２にアラームなどの時間を。
日程などの情報はtxtに書き出して起動時に読み出すようにしています。
そこでアラームの時間の設定をフォームを変えてそこに入力し、設定したらtxtに書き出して、フォーム１のほうで読み出すようにしています。
そこでこれを自分の家でも使いたいのですが、ファイルの読み込みを
「C:\Documents and Settings」（例です）のように直接書いているため、ほかの場所でやると起動しません。
自分のファイルの場所を読み取るにはどのようにすればよいでしょうか？

medaka 2005-12-19 11:19:22 No: 93290

その部分を書き直せばいいんじゃ？
「C:\Documents and Settings」（例です）
=> c:\hogehoge

学生 2005-12-19 11:24:01 No: 93291

自分の家だけでなくVB6.0が入ってない家でも使いたいので、
「C:\Documents and Settings」の部分を圧縮されているやつを解凍した先のパスにしたいんです。
なにか方法はありますか？

VB梅 2005-12-19 12:12:06 No: 93292

FileOpen(1, CurDir() & "\test".csv", OpenMode.Output)
PrintLine(1, "test")
FileClose(1)

CurDir() & "\test".csv" かな？

VB梅 2005-12-19 12:13:34 No: 93293

う、みす
CurDir() & "\test.csv"
です

KG 2005-12-19 12:35:04 No: 93294

App.Pathなどを使うとよさげですね：)

学生 2005-12-19 14:26:32 No: 93295

App.Pathについて少し調べてみました。
起動ファイルのフルパスを取得するというものなのでしょうか？
これは引用ですが・・・

strMyPath=App.Path ’strMyPath に "C:\Windows" 等が入る

と、書かれていました。
exeを起動時にそのexeが[C:\Windows]にあればstrMyPathに[C:\Windows]が入るということでしょうか？

seraph 2005-12-19 15:32:11 No: 93296

正解です。

MSDNライブラリ「Path プロパティ」からの引用ですが、

App オブジェクトの場合、アプリケーションを開発環境で実行しているときは、プロジェクトの .VBP ファイルの絶対パスを示します。一方、アプリケーションの実行可能ファイル (.EXE) を実行しているときは、実行ファイルの絶対パスを示します。

と、あります。

また、学生さんと言うコトでプロ向けの厳しい指摘は避けますが、
老婆心ながらアドバイスさせていただくと、上記に示したMSDNライブラリや
イミディエイトウィンドウ、ウォッチウィンドウなどの機能を使い慣れると
VBプログラミングが非常におもしろく楽しくなってくると思いますよ。

がんばってください。