オブジェクトを引数で渡した場合

解決

---

Private Sub ErrObject(ByRef objTxt1 As Object, _
                        Optional ByRef objTxt2 As Object, _
                      Optional ByRef objTxt3 As Object)

上のように、引数をオブジェクトで渡したいのです。
そのとき、Optionalで設定した、

objTxt2
objTxt3

にオブジェクトが渡されているかどうか
確認する方法はありますでしょうか？

isMissing()関数だと、値をみてしまいます。
よろしくお願いいたします。

編集 削除

---

Delphiでなら、Assigned(objTxt2)  またはobjTxt2 <> nil  (いずれも値があればTrue)ですから、
オブジェクトがNullであるか確認できればいいんですよね。

VBでは…。Nothingとか、使えないでしょうか？
objTxt2 <> Noting

編集 削除

---

> objTxt2 <> Noting

オブジェクトの場合は、 = や <> は使用できないので、 Is ですね。

Not (objTxt2 Is Nothing)
て感じかなぁ。

編集 削除

---

とろさんの方法でできました。
ありがとうございました＾＾

編集 削除

---

名前

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

本文

←解決時は質問者本人がここをチェックしてください。