実行時エラーについて

質問

お世話になっています。教えて下さい。

ＶＢで作ったプログラムです。
デバッグ時には何の問題もなく、実行可能(完全コンパイル後に実行)で、コンパイルも問題なく通りますが、ＥＸＥにして実行すると、以下のエラーが出ます。

実行時エラー:'91'
object変数、またはwithブロック変数が設定されていません。

どなたか、原因に心当たりがある方、いらっしゃったら教えて下さい。
よろしくお願いします。

回答No.3

D-MAKER · ベストアンサー

補足、早いですね。
問題の解決もこのまま進めば、時間の問題です。
shigeki-yyさんの補足の結果から判断すると、
SHELL周りが非常に怪しいです。
手元に資料がないので、（インターネットで探せば見つかるのですが、なまけものなのでお許しを）詳しいことは
書けませんが、確かWindows98とWindows2000では
SHELLの呼び方が違ったと思います。
まずは、その辺を調べてみてはいかがでしょうか？
補足の内容からコントロール関係は、あまり影響していないような気がしました。
SHELL周りで問題がないときにコントロールを調べたほうがいいと思います。
では。

お礼

調べたところ、呼び出し方と言うよりShell関数を動かしているDLLが、win98とwin2000では違うみたいです。

いろいろ勉強になりました。
忙しい中、ありがとうございました。

補足

ありがとうございます。

SHELL関数について、Microsoftのホームページなどインターネットで調べてみたんですけど、Win98とWin2000での違いについての記述は見つかりませんでした。
shellで呼んでも、フォームの表示までは正常に動いているので、そこが原因ではないような気もしています。

もう少しコントロールと平行して調べてみます。

回答No.4

todo36

>SHELL周りが非常に怪しいです。

SHELL関数の代わりにAPI関数のShellExecuteを使うとか
もしかして、画面を沢山開いていますか？

お礼

ありがとうございます。
ShellExecute関数に変えたらうまくいきました。あれほどうまくいかなかったのに。

shell関数の仕様が違うのか、プロセスの扱いが2000と98で違うんですかね？
ちなみに画面はそれほど開いていないです。前のプログラムが処理終了する寸前にパラメータを渡して起動しています。

回答No.2

D-MAKER

追加でお答えします。

補足で記載されていることから予想されることは、
shigeki-yyさんが作成されているＥＸＥは
Windows2000で作成されていて、そのＥＸＥをWindows98
で、実行できないと読み取れるのですが正しいですか？
作成環境と試験環境がどのような関係になっているのかが
ちょっと文面から読み取れないので、何ともいえませんが、下記の文章を参考にしていただけると幸いです。
コマンドボタンを押したときの先頭にＭＳＧＢＯＸを入れてもそこまでたどり着けないという現象からわかることはwithブロック変数が設定されていないという項目はないと思います。
ですからobject変数の宣言が怪しいか、後は環境の違いでしょう。
とりあえず全体に対してOption Explicit（つづりあってましたっけ？）を入れて、エラーをチェックしてみてください。
それでも引っかかるときは、フォームに張ってあるコンポーネントを疑ってみてください。
例えば、ＩＥに関連するコントロールやＯｆｆｉｃｅ関係のコントロール、ライセンスが必要なコントロール張ったりしていませんか？
その辺を疑ってみるといいと思います。
最後の手段で、Windows98で同じソースを使ってＥＸＥを作成＆デバッグすれば解決すると思います。
あまり回答にはなっていませんが、参考になればと思い書いて見ました。

補足

ありがとうございます。

おっしゃる通り、win2000でコンパイルしたEXEが98で動かないという事象です。(Win98でコンパイルしても同じ事象です。)
作成環境(Win2000)・実行環境(Win98SE)ともに同じバージョンのVisualStudio(V6.0SP5)がインストールされています。
OptionExplicitはデフォルトで入るようになっているので、その方面でのエラーはないようです。Win98でデバッグすると問題なく通ってしまうので、そこで原因も発見できませんでした。

もう少し、フォームに張り付いているコントロールの方を調べてみます。

あと、新たにわかったことは、別のVBからの呼び出し(SHELL関数)では同じ事象が起こりますが、単体(DOSコマンドラインから実行)だと動きます。呼び出しはSHELLで呼んでいるだけなので、そこに問題があるとも思えないのですが…。

回答No.1

D-MAKER

こんにちは。

質問内容から細かいことは何ともいえないのですが、
プログラミング＆デバッグしたマシンとＥＸＥを実行したマシンの環境が違うのではありませんか？
この場合は、フォームに張ってあるコントロールや、実行に必要なファイルが不足している恐れがあります。
ＶＢのバージョンとか張っているコントロールもしくはエラーの原因となりそうなオブジェクトの名前もあわせて質問すると回答者の方は的確なアドバイスをくれると思います。
実行時のエラーが出る場合は、エラーの原因となりそうなところにメッセージボックスを表示させ、どこまで処理が進んでいるか確認して、ソースを見直すことをお勧めします。これを繰り返していくと、だんだんエラーの原因となっているobject変数またはwithブロックにたどり着きます。この方法で、エラーの発生している行を突き止めましょう。

補足

指摘の通りです。大雑把な質問ですみません。

バージョンはVB6.0SP5です。
普通のコマンドボタンのクリックイベントでの処理なのですが、先頭にMSGBOXをかませても、その処理までたどり着きません。フォームなどは正常通りに表示され、機能しているんですけど、そのボタンを押した瞬間にフリーズして、Cntl－Alt-Deleteを押すと、上記のメッセージが表示されます。
そのプロシージャに書かれているソースを全部消しても同様になります。他に原因があるのかな…とも思うのですが。

ちなみに新しくわかったことですが、Windows2000では正常に動作し、エラーとなるのは、Windwos98です。