リスト8:グローバル変数の宣言と記号定数の定義


Private pdOldPrinterSet As PrinterDefault
' 印刷開始点の基準位置
Const START_X = 20 ' 開始X座標
Const START_Y = 21 ' 開始Y座標
' 各項目の開始X座標
Const TITLE_X = START_X + 15 ' タイトル
Const ORGTITLE_X = START_X + 90 ' 原題
Const ACTOR_X = START_X + 15 ' 主演
Const COSTARING_X = START_X + 90 ' 共演
Const DIRECTOR_X = START_X + 15 ' 監督
Const PRODUCE_X = START_X + 80 ' 製作
Const DEPEND_X = START_X + 110 ' 配給
Const COUNTRY_X = START_X + 140 ' 国
' 改行幅
Const LINE_FEED_MARGINES = 0.5
' 1ページの印刷項目数
Const MAXITEMS_ON_PAGE = 15


本文へ戻る