返回列表 上一主題 發帖

[發問] textbox 設條件式輸出

回復 1# user999
是ComboBox 吧
  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
複製代碼

TOP

        靜思自在 : 人生不一定球球是好球,但是有歷練的強打者,隨時都可以揮棒。
返回列表 上一主題