- PR -

CrystalReport上にデザインしたフィールドにプログラムからセットしたい

1
投稿者投稿内容
かもがや
大ベテラン
会議室デビュー日: 2004/08/31
投稿数: 103
投稿日時: 2004-12-09 13:29
脳味噌筋肉です。

RPTファイルのフィールドに対してプログラムからデータをセットしている
サンプルを探しています。

ご存知な方、ご教示頂ければ幸いです。
Jitta
ぬし
会議室デビュー日: 2002/07/05
投稿数: 6267
お住まい・勤務地: 兵庫県・海手
投稿日時: 2005-01-27 22:55
 もう解決しましたか?ちょうど今やったので。
コード:
Imports CrystalDecisions.CrystalReports.Engine

Dim obj As Object
obj = Report.ReportDefinition.ReportObjects.Item("txtOrganization")
If Not obj Is Nothing Then
	CType(CType(obj, FieldObject).DataSource _
	, FormulaFieldDefinition).Text = """あたい"""
End If


これはFieldObjectの場合です。TextObjectの場合は、
コード:
CType(CType(obj, TextObject).Text = "あたい"


二重引用符の付け方に注意してください。FieldObjectは“式”が入ります。その為、文字列の指定には2重引用符で囲みます。

# って、探してるスレッドはこれじゃなぁ〜いっ!

_________________
1

スキルアップ/キャリアアップ(JOB@IT)