SQL文？？？

Question

Private Sub 一覧A4_Click()

If IsNull(Me!ＡＡＡ詳細) Then
    
    MsgBox "印刷する範囲を選択してください。", vbInformation + vbOKOnly

    Exit Sub
End If

Model_pr_itiran_A4 make_pr_where

End Sub
上記のコードでModel_pr_itiran_A4 make_pr_whereがなにをやっているかがわかりません。
make_pr_whereは関数があるのはわかったのですが、Model_pr_itiran_A4がなにをしているかわかりません。
何に相当するかだけでも教えていただけますか？

Answer 1

そのソースからは「Model_pr_itiran_A4 は関数」ということと、
「make_pr_where関数の戻り値を引数として受け取っている」ということくらいしか分かりませんね。

Model_pr_itiran_A4 の上にカーソルを乗っけて、Shiftキー + F2キー を押せば
Model_pr_itiran_A4関数 のソースに飛ぶと思うのですが、
その飛んだ先のソースを見ない事にはなんとも・・・

関数名から「印刷」、「一覧」、「A4用紙」に関わる処理ということは推測できますが。

Comments

[sobue]

DoCmd.OpenReport Model_Buhin_a4, acViewPreview, , Pr_Where
Shiftキー + F2キー の中身が上記のコードでした
どんな意味ですか？

[twck]

Model_Buhin_a4変数の中にレポートの名前が入っています。
その名前のレポートを印刷プレビューとして開きます。
レポートを作るときの抽出条件（WHERE句の内容）は Pr_Where変数 に入っています。
そんな意味です。

[sobue]

ありがとうございます。VB.NETの経験はあるのですがアクセスは初めてなので助かりました。これで他のコードもよめそうです。