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