اقوم بالحجز من خلال calendar واقوم باختيار اليوم المراد الحجز فيه
ومزالت اريد عرض التوقيت بالطريقة المعروضة في الصورة بحيث اقوم باحتيار الساعة المراد الحجز فيها
ولو فكرت اعمل حلقة تقوم باضافة 30 دقيقة كل لفه هل تنجح او لا
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim startTime As New DateTime(2024, 1, 1, 8, 0, 0) 'Start time: 8:00 AM
Dim endTime As New DateTime(2024, 1, 1, 12, 0, 0) 'End time: 12:00 PM
Dim currentTime As DateTime = startTime
While currentTime <= endTime
ListBox1.Items.Add(currentTime.ToString("hh:mm tt"))
currentTime = currentTime.AddMinutes(30)
End While