1: Private Sub BTN_PRINT_Click() 2: ' [印刷]ボタンが押されたときの処理 3: FormPrintPreview.SetTitle "登録顧客一覧", DGrid_Customer 4: FormPrintPreview.Show 1 5: End Sub