0
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

ACCESS Macro If Message 确认选择的用法

Last updated at Posted at 2025-03-03

在Access的Macro里面需要用到
if (msgbox("xxxx", vbYesNo) = vbYes) then else end if
这样的语法时,Macro无法使用vbYesNo这样的英文
这时候可以直接使用数字带入

可将上面的式子置换成
MsgBox("xxxx",4)=6
即可做到相同的功能

图片.png

详细说明见以下表格

MsgBox の引数

定数 説明
vbOKOnly 0 [ OK ] ボタンのみ (既定値)
vbOKCancel 1 [OK] ボタンと [キャンセル] ボタン
vbAbortRetryIgnore 2 [ 中止 ]、[ 再試行 ]、[ 無視 ] の各ボタン
vbYesNoCancel 3 [ はい ]、[ いいえ ]、[ キャンセル ] の各ボタン
vbYesNo 4 [ はい ] ボタンと [ いいえ ] ボタン
vbRetryCancel 5 [ 再試行 ] ボタンと [ キャンセル ] ボタン
vbCritical 16 重大なメッセージ
vbQuestion 32 警告クエリ
vbExclamation 48 警告メッセージ
vbInformation 64 情報メッセージ
vbDefaultButton1 0 1 番目のボタンが既定 (既定値)
vbDefaultButton2 256 2 番目のボタンが既定
vbDefaultButton3 512 3 番目のボタンが既定
vbDefaultButton4 768 4 番目のボタンが既定
vbApplicationModal 0 アプリケーションのモーダル メッセージ ボックス (既定値)
vbSystemModal 4096 システムのモーダル メッセージ ボックス
vbMsgBoxHelpButton 16384 メッセージ ボックスに [ヘルプ] ボタンを追加する

MsgBox の戻り値

定数 説明
vbOK 1 [ OK ] ボタンが押された
vbCancel 2 [ キャンセル ] ボタンが押された
vbAbort 3 [ 中止 ] ボタンが押された
vbRetry 4 [ 再試行 ] ボタンが押された
vbIgnore 5 [ 無視 ] ボタンが押された
vbYes 6 [ はい ] ボタンが押された
vbNo 7 [いいえ] ボタンが押された

0
0
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
0
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?