ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý]®É¶¡®æ¦¡ªºÂà´«(¤w¸Ñ¨M)

¦^´_ 1# jiuhtsair
  1. Sub Ex()
  2.     Dim d As Date, t As Double
  3.     '1¤p®É=1 / 24
  4.     '1¤À = 1 / 24 / 60
  5.     '1¬í=1 / 24 / 60 / 60
  6.     t = (1 / 24) * 9 + (1 / 24 / 60) * 3 + (1 / 24 / 60 / 60) * 1
  7.     d = t
  8.     MsgBox t & Chr(10) & d
  9. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¦Û¤v®`¦Û¤v¡A²ö¹L©ó¶ÃµoµÊ®ð¡C
ªð¦^¦Cªí ¤W¤@¥DÃD