ຟັງຊັນ 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
    
ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!

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