VB.NET

Display hours of day in 24 hour in listview

Please support our VB.NET advertiser: Intel Parallel Studio Home

Thread Solved

•

Join Date: Apr 2008

Posts: 115

Reputation: ninjaimp is an unknown quantity at this point

Solved Threads: 6

ninjaimp

Offline

Junior Poster

Display hours of day in 24 hour in listview

Jun 23rd, 2008

Hi

I am trying to populate a listview with all the hours of the day in 30 minute intervals.

I can doing very basically from 0 to 24 with the following code:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
 
Private Sub CreateTimeStep()
 
        For i = 0 To 25 Step 0.5
 
            lstDays.Items.Add(i)
 
        Next
    End Sub
Private Sub CreateTimeStep()

        For i = 0 To 25 Step 0.5

            lstDays.Items.Add(i)

        Next
    End Sub

but what i would like to do is have it display in 24 hour format e.g. 00:00, 00:30 ...etc

I have tried using the date.time variable but it just doesnt work.

•

Join Date: Dec 2002

Posts: 461

Reputation: waynespangler is on a distinguished road

Solved Threads: 56

waynespangler waynespangler is offline

Offline

Posting Pro in Training

Re: Display hours of day in 24 hour in listview

Jun 23rd, 2008

Try this:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
        Dim d As Date = "00:00:00"
        For x As Integer = 0 To 47
            ListBox1.Items.Add(d.TimeOfDay.ToString)
            d = d.AddMinutes(30)
        Next
        Dim d As Date = "00:00:00"
        For x As Integer = 0 To 47
            ListBox1.Items.Add(d.TimeOfDay.ToString)
            d = d.AddMinutes(30)
        Next

Last edited by waynespangler; Jun 23rd, 2008 at 1:37 pm.

Wayne

It is hard to understand how a cemetery can raise its burial rates and blame it on the cost of living.

•

Join Date: Apr 2008

Posts: 115

Reputation: ninjaimp is an unknown quantity at this point

Solved Threads: 6

ninjaimp

Offline

Junior Poster

Re: Display hours of day in 24 hour in listview

Jun 23rd, 2008

this looks like just the thing - many thanks - will update when tested

•

Join Date: Apr 2008

Posts: 115

Reputation: ninjaimp is an unknown quantity at this point

Solved Threads: 6

ninjaimp

Offline

Junior Poster

Re: Display hours of day in 24 hour in listview

Jun 23rd, 2008

hi

your code worked fine but i just needed to get rid of the last zeros so used the following

Dim d As DateTime = FormatDateTime("00:00")
For x As Integer = 0 To 47
lstDays.Items.Add(FormatDateTime(d.TimeOfDay.ToString, DateFormat.ShortTime))
d = d.AddMinutes(30)
Next
End Sub