リスト１：メインフォームの[印刷]ボタンがクリックされたときの処理
Private Sub cmdPrint_Click()
Set frmPrint.rsMovie = datMovie.Recordset
frmPrint.Show 1
End Sub
本文へ戻る