[WR2.0]表示・非表示

[saito]

バージョンを書き忘れました。

以前の掲示板（0027）でオブジェクトの表示切替が
あってその通りにやってみたのですがうまくいきません。
ご教授お願い致します。

Dim SetOBJ As WROBJPROPERTY
SetOBJ.fVisible = 0
If wrSetObjectProp(hReport, “Line200”,WON_VISIBLE, SetOBJ) Then
‘詳細なエラーコードを取得
dwErrorCode = wrGetErrorCode(hReport, True)
MsgBox dwErrorCode
‘戻る
Exit Sub
End If

　※　dwErrorCodeの値は０です。
　※　Line200はグループ化してありません。

***　開発環境　******
　VB6 SP5 Windows2000
********************

[松嶋＠ソフトウィング]

お世話になります。

wrSetObjectProp関数の戻り値はBooleanとなっており、処理に
失敗したときのみFalseを戻します。
大変お手数ですが、下記の様にコードを修正してテストを行っ
て頂けないでしょうか？

　　if not wrSetObjectProp( …… ) then
.
.
end if

以上、宜しくお願い致します。

[saito]

お世話になります。

教えて頂いた通りにやってみたのですが
結果は同じでした。
基本的なミスをしてるのでしょうか？
宜しくお願い致します。

[松嶋＠ソフトウィング]

お世話になります。

ご連絡ありがとうございます。
前回お知らせ頂いた内容からwrSetObjectProp関数は正常に
終了している様ですので、”Line200″のみ定義した帳票を新
規に作成しテストを行って見てください。

以上、宜しくお願い致します。

[投稿者]

投稿