ເນື້ອໃນ

# ຟັງຊັນ FormatDateTime [VBA]

ນຳໃຊ້ຮູບແບບວັນທີ ແລະ/ຫຼື ເວລາ ໃຫ້ກັບນິພົດວັນທີ ແລະ ສົ່ງຄືນຜົນໄດ້ຮັບເປັນຂໍ້ຄວາມ.

ຄ່າຄົງທີ່, ຟັງຊັນ ຫຼື ອັອບເຈັກນີ້ຈະຖືກເປີດໃຊ້ດ້ວຍຄຳສັ່ງ Option VBASupport 1 ທີ່ວາງໄວ້ກ່ອນລະຫັດໂປຣແກຣມໃນໂມດູນ.

### ໄວຍາກອນ:

            FormatDateTime (Date As Date [, NamedFormat As Integer])

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

String

### ພາຣາມິເຕີ:

Date: ນິພົດວັນທີທີ່ຈະຈັດຮູບແບບ.

NamedFormat: (ເລືອກໄດ້) ຄ່າລະບຸ vbDateTimeFormat ເພື່ອກຳນົດຮູບແບບທີ່ຈະນຳໃຊ້ກັບນິພົດວັນທີ ແລະ ເວລາ. ຫາກລະເວັ້ນໄວ້, ຈະໃຊ້ຄ່າ vbGeneralDate.

### ຮູບແບບວັນທີ ແລະ ເວລາ (vbDateTimeFormat enumeration)

ຄ່າຄົງທີ່ທີ່ມີຊື່ | ຄ່າ | ຄຳອະທິບາຍ
--- | --- | ---
vbGeneralDate | 0 | ສະແດງວັນທີ ແລະ/ຫຼື ເວລາ ຕາມທີ່ກຳນົດໄວ້ໃນການຕັ້ງຄ່າ General Date ຂອງລະບົບ. ຫາກມີພຽງວັນທີ, ຈະບໍ່ສະແດງເວລາ; ຫາກມີພຽງເວລາ, ຈະບໍ່ສະແດງວັນທີ.
vbLongDate | 1 | ສະແດງວັນທີໂດຍໃຊ້ຮູບແບບວັນທີແບບຍາວ ທີ່ລະບຸໄວ້ໃນການຕັ້ງຄ່າທ້ອງຖິ່ນຂອງຄອມພິວເຕີຂອງທ່ານ.
vbShortDate | 2 | ສະແດງວັນທີໂດຍໃຊ້ຮູບແບບວັນທີແບບສັ້ນ ທີ່ລະບຸໄວ້ໃນການຕັ້ງຄ່າທ້ອງຖິ່ນຂອງຄອມພິວເຕີຂອງທ່ານ.
vbLongTime | 3 | ສະແດງເວລາຕາມທີ່ກຳນົດໄວ້ໃນການຕັ້ງຄ່າ Long Time ຂອງລະບົບ.
vbShortTime | 4 | ສະແດງເວລາໂດຍໃຊ້ຮູບແບບ 24 ຊົ່ວໂມງ (hh:mm).

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

13 ປະເພດຂໍ້ມູນບໍ່ເຂົ້າກັນ

### ຕົວຢ່າງ:

            REM  *****  BASIC  *****
            Option VBASupport 1
            Sub DateFormat
             Dim d as Date
             d = ("1958-01-29 00:25")
             msgbox("ຮູບແບບວັນທີທົ່ວໄປ : " & FormatDateTime(d))
             msgbox("ຮູບແບບວັນທີແບບຍາວ : " & FormatDateTime(d,vbLongDate))
             msgbox("ຮູບແບບວັນທີແບບສັ້ນ : " & FormatDateTime(d,vbShortDate))
             msgbox("ຮູບແບບເວລາແບບຍາວ : " & FormatDateTime(d,3))
             msgbox("ຮູບແບບເວລາແບບສັ້ນ : " & FormatDateTime(d,vbShortTime))
            End Sub

ຫົວຂໍ້ທີ່ກ່ຽວຂ້ອງ

ຟັງຊັນວັນທີ ແລະ ເວລາຂອງ VBA

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