Setupさせるとファイルを認識しないのですが・・・ (ID:114433)

名前

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

本文 [VB6] ディストリビューションパッケージを作るときに プログラムで使う写真が200枚くらい入っているフォルダを (フォルダ名：写真(JPG画像のみ)） ディストリビューションウィザードではパッケージせず 出来上がったパッケージの『Support』フォルダに 自分でその"写真"フォルダを置き、 その後インストールしてみたのですが、ソフト稼動中に うまく写真フォルダを開くことができません。 どのようにすれば、良いのでしょうか？ -------------------------------- Private Sub Form_Load() 〜 ChDir App.Path 〜 End Sub -------------------------------- Private Sub PictureChange() 'ランダムに写真を出す Photo = Int((42 * Rnd) + 100) Image1.Picture = LoadPicture(App.Path & "\写真\" & Photo & ".jpg") End Sub -------------------------------- という感じのプログラムです。