| |
|
|
| | Access 2003.
Подскажите люди добрые, может кто тоже упирался в такой баг раньше меня.
Как может в таком куске кода, MsgBox всегда выдавать только "true"???
Resp = MsgBox(StrMsg, vbYesNo + vbQuestion + vbDefaultButton1, "попытка списания товара")
If Resp = vbYes Then.....
|
Любую кнопусю жму - всё-равно "True". Не "vbYes", не "vbNo" - нет. Только "true"(6) - хоть плачь?
Что это?
Акс битый?
М.б. кто сталкивался - подскажите, что это может быть и как лечить?..  | |
| |
| |
| |
|
|
| | попробуйте так
If MsgBox("текст_сообщения", vbQuestion + vbYesNo, "Внимание!") = vbNo Then Exit Sub
|
| |
| |
| |
| |
|
|
| | А Resp у Вас не boolean сейЧас
==============================
Dim Resp As boolean | |
| |
| |
| |
|
|
| | MsgBox всегда выдает результат As VbMsgBoxResult.
Как объявлена Resp? Должна быть так:
Dim Resp As VbMsgBoxResult | |
| |
| |
| |
|
|
| | Ну надо - чудеса какие...
Действительно Resp было Boolean объявлено...
Переделал "по Лукасу" - всё запахало.
Премного Вам благодарен...
Спасибки огромные... | |
| |
| |
