wrSetObjectPropについて教えてください

[渋谷 友幸]

WR2.0です。
VBで、プログラムしていますが、Circleを書式上で、表示、非表示にプログラムで設定したいのですが、wrSetObjectPropをしようすればできると思うのですが、実際上どのような書き方か、マニュアルをみてもわかりません。
　下記のようなプログラムを書きたいのですが。
If JuminOptionI(0).Value = True Then
nRet = wrSetObjectProp 　(hReport, “Circle0”, “Visible”, )
ElseIf JuminOptionI(1).Value = True Then
nRet = wrSetObjectProp(hReport, “Circle1”, “Visible”, )
ElseIf JuminOptionI(2).Value = True Then
nRet = wrSetObjectProp(hReport, “Circle2”, “Visible”, )
ElseIf JuminOptionI(3).Value = True Then
nRet = wrSetObjectProp(hReport, “Circle3”, “Visible”, )
ElseIf JuminOptionI(4).Value = True Then
nRet = wrSetObjectProp(hReport, “Circle4”, “Visible”, )

End If

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

お世話になります。

v2.0の設定は以下の様に処理を行います。

例）
Dim WROBJProp As WROBJPROPERTY
WROBJPropJ.fVisible = 0

If wrSetObjectProp(hReport, “Circle0”,WON_VISIBLE, WROBJProp) = 0 Then
‘ エラー処理
End If

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

[投稿者]

投稿