仕事を頑張る人のおしりトラブル対策

お知恵の拝借をお願いします。
フォームでボタンが2つあります。
Aのボタンを押した時、kizyun ="1"
Bのボタンを押した時、kizyun ="2"
をセットするようにしています(下記の参考)

Cのボタンを押した時、kizyun ="1"だったら、クエリA
kizyun ="2"だったら、クエリBを起動します。

過去の質問履歴を参考に、以下の記述しましたが、????????に何を入力すればよいか、
また、他の式はあっているのか教えて頂けませんでしょうか。
宜しくお願いします。


select case ????????

case kizyun ="1"
docmd.openquery "クエリA"

case kizyun ="2"
docmd.openquery "クエリB"

end Select



【参考】
Public Function Odbc_Yearly()
kizyun =1
End Function

Public Function Odbc_Monthly()
kizyun =2
End Function

A 回答 (2件)

その部分だけでしたら



Select Case kizyun
 Case "1"
  docmd.openquery "クエリA"
 Case "2"
  docmd.openquery "クエリB"
End Select
    • good
    • 0
この回答へのお礼

できました。ラックさん、ありがとうございます♪

お礼日時:2017/02/23 14:56

その形式の方が好みでしたら、



Select Case True
Case (ここに条件を書く:例 kizyun =1)

Case (条件2)

・・・
(Case else:必要なら、)
上記の条件に対応しない場合
End Select

まあ、こちらの形式の方が複数の条件を設定できるメリットはあります。


ところで、他に気になる点が・・・
「kizyun」は文字列?数字?

・Public Function Odbc_Yearly()
・Public Function Odbc_Monthly()
は、「kizyun」の値を設定するためだけに、引数無しで使用しているようですが、問題ありませんか?

Aのボタン_Clickのイベントで
Odbc_Yearly としているのでしょうか?
もしこれだけであれば、直接
Aのボタン_Clickのイベントに「kizyun ="1"」としてもいいように思います。
他の関連する変数を同時に設定したい場合はべつです。


「docmd.openquery "クエリA"」
クエリの起動のさせ方のようですが、正直わかりませんので、コメントできません。
    • good
    • 0
この回答へのお礼

Zincerさん、ご回答ありがとうございます。

kizyunは文字列になります。 記載しませんでしたが、引数は定義しています。

せっかく、教えて頂いたのですが、NO1のラックさんのやり方で解決しました。

ありがとうございます。

お礼日時:2017/02/23 14:56

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング