クリスタルレポート＋文字列セット

質問

環境：Windows2000＋VB5.0

既存システムの変更をしています。
VB5.0でつくっており、CrystalReportで
レポート出力を行っています。
私はCrystalReportsを使ったことないのですが、
VBのフォームで
名前テキストボックス、社員番号テキストボックスがあり、
そこで印刷プレビューボタンをクリック、
そうするとプレビュー画面があがる、といった
場合、ヘッダーに名前テキストの内容と社員番号テキストの内容を
印字させたいのですが、どうしたらいいのでしょうか？
名前も社員もデータベースにあるものでなく、
フォームにあるテキストに入力されたものを使います。

ヘルプなどをみていると、
Rpt.Formulas(0) = "名前 = 'ああああ'"

とやるとOKと書いていましたが、
その後、Rpt.Action = 1
でエラーになりました。（「式名が不正です。」）
ちなみに、クリスタルレポートには、名前というテキストフィールドを
ヘッダーにはりつけ、その部分をセットしようとしているのですが・・・

よろしくお願いいたします。

回答No.1

suigaku · ベストアンサー

まず、クリスタルレポートに空の式を作ります。
例）Test1, Test2
そして、VBのコードで、
CrystalReport1.DataFiles(0)="db1.mdb"
CrystalReport1.ReportFileName="レポート.rpt"
CrystalReport1.Formulas(0)="Test1='TEST'" 'ここで空の式に値を代入(文字の場合)
CrystalReport1.Formulas(1)="Test2=111" '数値の場合
'* 式の名前の後にはスペースは入れずに=で値とつないで下さい。
'* CrystalReport1.FormulasにつけるIndexはここで、値を入れる式毎にふって下さい。
CrystalReport1.PrintReport

と、他のところの過去ログにありました。