ຟັງຊັນ MsgBox

ສະແດງກ່ອງໂຕ້ຕອບທີ່ມີຂໍ້ຄວາມ ແລະ ສົ່ງຄືນຄ່າ.

ໄວຍາກອນ:


MsgBox (Prompt As String [,Buttons = MB_OK [,Title As String]]) As Integer

ພາຣາມິເຕີ:

prompt: ນິພົດສະຕຣິງທີ່ສະແດງເປັນຂໍ້ຄວາມໃນກ່ອງໂຕ້ຕອບ. ສາມາດແຊກການຂຶ້ນແຖວໃໝ່ໄດ້ດ້ວຍ Chr$(13).

title: ນິພົດສະຕຣິງທີ່ສະແດງຢູ່ໃນແຖບຫົວຂໍ້ຂອງກ່ອງໂຕ້ຕອບ. ຫາກລະເວັ້ນໄວ້, ແຖບຫົວຂໍ້ຈະສະແດງຊື່ຂອງແອັບພລິເຄຊັນນັ້ນໆ.

buttons: ນິພົດຈຳນວນຖ້ວນໃດໜຶ່ງທີ່ກຳນົດປະເພດຂອງກ່ອງໂຕ້ຕອບ, ລວມທັງຈຳນວນ ແລະ ປະເພດຂອງປຸ່ມທີ່ຈະສະແດງ, ແລະ ປະເພດໄອຄອນ. buttons ແທນການປະສົມຂອງຮູບແບບບິດ, ນັ້ນຄື ສາມາດກຳນົດການປະສົມຂອງອົງປະກອບຕ່າງໆໄດ້ໂດຍການບວກຄ່າຂອງພວກມັນເຂົ້າກັນ:

ຄ່າຄົງທີ່ທີ່ມີຊື່

ຄ່າຈຳນວນຖ້ວນ

ຄຳນິຍາມ

MB_OK

0

ສະແດງປຸ່ມ OK ເທົ່ານັ້ນ.

MB_OKCANCEL

1

ສະແດງປຸ່ມ OK ແລະ Cancel.

MB_ABORTRETRYIGNORE

2

ສະແດງປຸ່ມ Abort, Retry, ແລະ Ignore.

MB_YESNOCANCEL

3

ສະແດງປຸ່ມ Yes, No, ແລະ Cancel.

MB_YESNO

4

ສະແດງປຸ່ມ Yes ແລະ No.

MB_RETRYCANCEL

5

ສະແດງປຸ່ມ Retry ແລະ Cancel.

MB_ICONSTOP

16

ເພີ່ມໄອຄອນ Stop ໃສ່ກ່ອງໂຕ້ຕອບ.

MB_ICONQUESTION

32

ເພີ່ມໄອຄອນ ຄຳຖາມ (Question) ໃສ່ກ່ອງໂຕ້ຕອບ.

MB_ICONEXCLAMATION

48

ເພີ່ມໄອຄອນ ເຄື່ອງໝາຍຕົກໃຈ (Exclamation Point) ໃສ່ກ່ອງໂຕ້ຕອບ.

MB_ICONINFORMATION

64

ເພີ່ມໄອຄອນ ຂໍ້ມູນ (Information) ໃສ່ກ່ອງໂຕ້ຕອບ.

128

ໃຫ້ປຸ່ມທຳອິດໃນກ່ອງໂຕ້ຕອບເປັນປຸ່ມເລີ່ມຕົ້ນ.

MB_DEFBUTTON2

256

ໃຫ້ປຸ່ມທີສອງໃນກ່ອງໂຕ້ຕອບເປັນປຸ່ມເລີ່ມຕົ້ນ.

MB_DEFBUTTON3

512

ໃຫ້ປຸ່ມທີສາມໃນກ່ອງໂຕ້ຕອບເປັນປຸ່ມເລີ່ມຕົ້ນ.


ປະເພດຄ່າທີ່ສົ່ງກັບ:

ຈຳນວນຖ້ວນ

ຄ່າຄົງທີ່ທີ່ມີຊື່

ຄ່າຈຳນວນຖ້ວນ

ຄຳນິຍາມ

IDOK

1

OK

IDCANCEL

2

Cancel

IDABORT

3

Abort

IDRETRY

4

Retry

IDIGNORE

5

Ignore

IDYES

6

Yes

IDNO

7

No


ລະຫັດຂໍ້ຜິດພາດ:

5 ການເອີ້ນໃຊ້ໂປຣຊີເຈີບໍ່ຖືກຕ້ອງ

ຕົວຢ່າງ:


Sub ExampleMsgBox
Dim sVar As Integer
 sVar = MsgBox("Las Vegas")
 sVar = MsgBox("Las Vegas",1)
 sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialog title")
 sVar = MsgBox("Las Vegas", MB_DEFBUTTON2 + MB_ICONSTOP + MB_ABORTRETRYIGNORE, "Dialog title")
End Sub
ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!

ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!