各種プログラムからの実行
前へ 戻る次へ


４．２．２　Microsoft Visual Basic (OLEオートメーション)
Microsoft Visual Basic で作成するプログラムから帳票を表示/印刷する方法について説明します。


（１）ボタンの押下でプレビューを表示
① Visual Basic を起動し、［標準 EXE］のプロジェクトを新規作成します。


② ［Form1］にボタンを作成し、作成したボタンをダブルクリックして、Clickイベントのメソッドを表示します。


③ コードを次のように編集します。

Private Sub Command1_Click()
    Set rptObj = CreateObject("Wfrfv.Document.1")
    rptObj.Open "請求書1.wfd"
    rptObj.Visible = True
End Sub


④ このプログラムを実行し、表示されるフォーム（Form1）でボタンを押下すると、プレビューが表示されます。




（２）ボタンの押下でバックグラウンド印刷
コードを次のように変更することで、バックグラウンドで印刷することができます。

Private Sub Command1_Click()
    Set rptObj = CreateObject("Wfrfv.Document.1")
    rptObj.Open "請求書1.wfd"
    rptObj.PrintOutBk "", 0, 0
End Sub



前へ 戻る次へ