>>765 カレンダーって、そんなに使うかなぁ。まして、時刻なら
日本語入力プロパティを「オフ」に設定してやれば 0:00って打つだけだと思うけど。
よくweb系アプリであるデザイン:コンボボックス 時=c1 分=c2 値集合タイプ:値リスト(両方とも)
規定値="00" (両方とも) 実際にデータベースに紐づけるテキストボックス txt1
private Sub Form_Open(Cancel As Integer)
Dim i As Integer,rowtext As String
rowtext = ""
For i = 0 To 23 rowtext = rowtext & Format(i, "00") & "," Next i
rowtext = Left(rowtext, Len(rowtext) - 1)
Me!c1.RowSource = rowtext
rowtext = ""
RowSource = 0
For i = 0 To 55 Step 5 rowtext = rowtext & Format(i, "00") & "," Next i
rowtext = Left(rowtext, Len(rowtext) - 1)
Me!c2.RowSource = rowtext
End Sub

Private Sub c1_Change()
Dim timestr As String
timestr = Me!c1 & ":" & Me!c2
Me!txt1 = TimeValue(timestr)
End Sub
Private Sub c2_Change()
Dim timestr As String
timestr = Me!c1 & ":" & Me!c2
Me!txt1 = TimeValue(timestr)
End Sub 'c1とc2の動作は同じなので、共通プロシージャとしたほうが可視性が良い