ຟັງຊັນ DateValue

ສົ່ງຄືນວັດຖຸ ວັນທີ ຈາກສະຕຣິງທີ່ແທນວັນທີ.

ວັດຖຸທີ່ສົ່ງຄືນຈະຖືກສະແດງພາຍໃນເປັນຄ່າຕົວເລກດຽວທີ່ກົງກັບວັນທີທີ່ລະບຸ. ຄ່ານີ້ສາມາດໃຊ້ເພື່ອຄຳນວນຈຳນວນວັນລະຫວ່າງສອງວັນທີ.

ໄວຍາກອນ:


  DateValue(date As String)

ພາຣາມິເຕີ:

date: ສະຕຣິງທີ່ບັນຈຸວັນທີທີ່ຈະຖືກແປງເປັນວັດຖຸ ວັນທີ.

ສະຕຣິງທີ່ສົ່ງໄປຫາ DateValue ຕ້ອງສະແດງຢູ່ໃນຮູບແບບວັນທີໃດໜຶ່ງທີ່ກຳນົດໂດຍການຕັ້ງຄ່າທ້ອງຖິ່ນ (locale) ຂອງທ່ານ (ເບິ່ງ - ພາສາ ແລະ ການຕັ້ງຄ່າທ້ອງຖິ່ນ - ທົ່ວໄປ) ຫຼື ໃຊ້ຮູບແບບວັນທີ ISO "yyyy-mm-dd" (ປີ, ເດືອນ ແລະ ວັນ ແຍກກັນດ້ວຍເຄື່ອງໝາຍຂີດກາງ).

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

Date.

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

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

ຕົວຢ່າງ:


  Sub ExampleDateValue
      Dim aDate As Date
      aDate = DateValue("2021-12-20")
      ' ພິມວັນທີຕາມການຕັ້ງຄ່າທ້ອງຖິ່ນ
      MsgBox aDate
      ' ແຍກປີ, ເດືອນ ແລະ ວັນ ອອກຈາກວັດຖຸວັນທີ
      MsgBox Year(aDate)
      MsgBox Month(aDate)
      MsgBox Day(aDate)
      ' ພິມຄ່າຕົວເລກທີ່ກົງກັບວັນທີ (ເປັນປະເພດ Long)
      MsgBox CLng(aDate)
  End Sub

ຟັງຊັນ DateSerial