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

[µo°Ý] textbox ³]±ø¥ó¦¡¿é¥X

¦^´_ 1# user999
¬OComboBox §a
  1. Private Sub UserForm_Initialize()
  2.     Dim I As Date
  3.     I = #12:00:00 AM#
  4.     Do
  5.         ComboBox1.AddItem Format(I, "hhmm")
  6.         I = I + #12:01:00 AM#
  7.     Loop Until Format(I, "hhmm") = "0000"
  8. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤@¥y·Å·xªº¸Ü¡A´N¹³©¹§O¤H¨­¤WÅx­»¤ô¡A¦Û¤v·|ªg¨ì¨â¤Tºw¡C
ªð¦^¦Cªí ¤W¤@¥DÃD