ເນື້ອໃນ

# ຟັງຊັນ Timer

ສົ່ງຄືນຄ່າທີ່ລະບຸຈຳນວນວິນາທີທີ່ຜ່ານໄປຕັ້ງແຕ່ທ່ຽງຄືນ.

ທ່ານຕ້ອງປະກາດຕົວປ່ຽນກ່ອນເພື່ອເອີ້ນໃຊ້ຟັງຊັນ Timer ແລະ ກຳນົດປະເພດຂໍ້ມູນເປັນ "Long ", ບໍ່ດັ່ງນັ້ນຄ່າ Date ຈະຖືກສົ່ງຄືນ.

### ໄວຍາກອນ:

      Timer

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

ວັນທີ

### ຕົວຢ່າງ:

      Sub ExampleTimer
          Dim lSec As Long,lMin As Long,lHour As Long
          lSec = Timer
          MsgBox lSec, 0, "ວິນາທີນັບແຕ່ທ່ຽງຄືນ"
          lMin = Int(lSec / 60)
          lSec = lSec Mod 60
          lHour = Int(lMin / 60)
          lMin = lMin Mod 60
        MsgBox Format(lHour,"00") & ":"& Format(lMin,"00") & ":" & Format(lSec,"00"),  0, "ເວລາແມ່ນ"
    End Sub

ຟັງຊັນ Timer ວັດແທກເວລາເປັນວິນາທີ. ເພື່ອວັດແທກເວລາເປັນມິນລີວິນາທີ ໃຫ້ໃຊ້ ບໍລິການ Timer ທີ່ມີຢູ່ໃນໄລບຣາຣີ ScriptForge.

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

ບໍລິການ ScriptForge.Timer

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