ªð¦^¦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 : ¯u¥¿ªº·R¤ß¡A¬O·ÓÅU¦n¦Û¤vªº³oÁû¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD