ຟັງຊັນ Hour

ສົ່ງຄືນຊົ່ວໂມງຈາກຄ່າເວລາທີ່ສ້າງໂດຍຟັງຊັນ TimeSerial ຫຼື TimeValue.

ໄວຍາກອນ:

Hour (Number)

ຄ່າສົ່ງຄືນ:

ຈຳນວນຖ້ວນ (Integer)

ພາຣາມິເຕີ:

Number: ນິພົດຕົວເລກທີ່ບັນຈຸເລກລຳດັບເວລາ ເຊິ່ງໃຊ້ເພື່ອສົ່ງຄືນຄ່າຊົ່ວໂມງ.

ຟັງຊັນນີ້ແມ່ນກົງກັນຂ້າມກັບຟັງຊັນ TimeSerial. ມັນຈະສົ່ງຄືນຄ່າຈຳນວນຖ້ວນທີ່ແທນຊົ່ວໂມງຈາກຄ່າເວລາທີ່ສ້າງໂດຍຟັງຊັນ TimeSerial ຫຼື TimeValue. ຕົວຢ່າງ, ນິພົດ

Print Hour(TimeSerial(12,30,41))

ສົ່ງຄືນຄ່າ 12.

ຕົວຢ່າງ:

          Sub ExampleHour
          Print "ຊົ່ວໂມງປັດຈຸບັນແມ່ນ " & Hour( Now )
          End Sub