コントロール変数についての質問です。
コントロール変数を関数に渡す際に引数が省略可能な形(optional)で渡しています。
コントロール変数が省略されているか否かを判断する処理をしたいのですが、
IsnullやIsmissingなどで判定できず、
オブジェクト変数またはWithブロック変数が設定されていません。という
エラーメッセージが返ってきます。
コントロール変数にコントロールが設定されているかの判定は出来ないのでしょうか？
よろしくお願いします。
OS Win2000 VB6.0
未検証ですがこんな感じで。
ポイントは Is 演算子と、Nothing キーワード。
Private Function InstanceTest(Optional objAnyControl As Control = Nothing) As
Boolean
Dim blnReceived As Boolean
If objAnyControl Is Nothing Then
blnReceived = True
Else
blnReceived = False
End If
InstanceTest = blnReceived
End Function
あ、True と False が意味的に逆ですね。
まあ、その辺は検証してください。
引数に初期値を入れた所IsとNothingで処理出来ました。
ありがとうございました。助かりました。
返信する
最新の投稿: お久しぶりです、いかがお過ごしでしょうか。 最新のメンバー: gantez 最近の投稿 未読の投稿
