Microsoft Access 掲示板

[登録時]2グループ組合せの自動採番 /管理番号連番自動入力 / 5

6 コメント
views
4 フォロー
5
hiroton 2021/02/01 (月) 13:11:35 b3a2d@f966d >> 4

プログラミングのテクニックというやつですね
「新規か修正」、2つの状態を判断できればいいので「ONかOFF」2つの状態を持てるチェックボックスで代用するという流れです。IF文との相性がいい(コードが簡素)になるのもポイントです

その代わり、新規登録モード = Falseのとき、何モードなの?というのはコードを読んでも分かりにくいという面はあります


テキストボックスで実装してもいいですし、3つの状態を判断しなければならないとかだとチェックボックスだと厳しいなんてこともあります

クエリ検索フォーム
[モード]テキストボックスを配置

新規登録用
Me!モード = "Touroku"
Docmd.OpenForm "登録修正用フォーム"

修正用
Me!モード = "kakikae"
Docmd.OpenForm "登録修正用フォーム"

閲覧用
Me!モード = "etsuran"
Docmd.OpenForm "登録修正用フォーム"

登録修正用フォーム

Select Case Forms!クエリ検索フォーム!モード
Case "Touroku"
    施設ID = ほにゃらら
Case "kakikae"
    '修正用処理
Case "etsuran"
    '閲覧用処理(書き換え自体を禁止するとか)
Case Else
    MsgBox "モード指定が不正です"
End Select

先の回答の通りこのコード自体はあまり良いものではないですが、考え方としてはこういう流れになります

テキスト(文字)を使うとコードだけを見ても何をやっているのが分かりやすいというメリットもあります(Case "etsuran"の中で施設ID = ほにゃららとかあったら「おかしくない?」ってなるとか)

通報 ...