■No56189 (YUKI さん) に返信
> こんにちは。
> コンボボックスに時間を格納したいのですがやり方が
> 分かりません。
> 開始時間と終了時間が指定されていて30分毎に時間を
> 格納したいと考えています。
> よろしくお願いしたします
dtStart as Date : 開始時間
dtEnd as Date : 終了時間
cbo1 as ComboBox : 対象コンボ
Dim dtTmp as Date = dtStart
Do While dtTmp<=dtEnd
cbo1.Items.Add(dtTmp.ToString("HH:mm"))
dtTmp = dtTmp.AddMinutes(30)
Loop
直接書いたコードなので検証してません。
|