Visual Basicでのサンプルプログラムの記述例を次に示します。
Private Sub Command1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Command1.Click
Dim objEurReport As Object 'オブジェクトを定義
objEurReport=CreateObject("APGRPT.Report.3") 'EURのオブジェクトを作成
objEurReport.Application.ReportBasePath= _
"C:¥Program Files¥Hitachi¥EUR Designer¥Sample¥Reports¥"
'帳票ファイルのフォルダを指定
objEurReport.Application.Open("納品書.fms") '帳票ファイルを開く
objEurReport.Application.Document.PrintOut(0, 0, 1) '帳票の印刷
objEurReport.Application.Quit 'EURの終了
Set objEurReport = Nothing 'EURのオブジェクトを解放
Exit Sub