Programming Forums > Application Development > Visual Basic .NET

nascar2000 · Nov 12th, 2006, 9:07 AM

hello everybody , i am doing a vb project and needs some help. i currently store the date and time details in access database. i want to retreive the time to a textbox. but when i retreive the time the date also show up. how do i limit to time only

thx.

alphonso · Nov 12th, 2006, 11:57 AM

Next time, don't put words like "help", "please...", and other words that don't specifically say anything.

What was the object you used to call your MS Access file?

hbe02 · Nov 12th, 2006, 1:20 PM

show us some code so we can help.. i have posted something about MSAccess and dates before, you should also search the forums b4 posting..
what are you using ? oledbreader..?

nascar2000 · Nov 12th, 2006, 8:02 PM

what i mean is this. i want to extract the time from the date function. that is one question. the other one is when i extract a time from the database it shows wrong time,which is not stored in my database , could anyof you explain to me why?

thx

Samuaijack · Nov 12th, 2006, 9:09 PM

Quote:

show us some code so we can help

:beard:

alphonso · Nov 13th, 2006, 4:08 AM

We can take literally hundreds of guesses to your question if you don't have the codes posted

melbolt · Nov 13th, 2006, 10:13 AM

here's one way to do it

 vbnet Syntax (Toggle Plain Text) 
Public Class Form1
 
    'make a date variable
    Dim theDate As New DateTime
 
 
    ''' <summary>
    ''' form load handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'get the date and time and put it in the variable
        theDate = Now
    End Sub
 
 
    ''' <summary>
    ''' button click handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnFullDateTime_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFullDateTime.Click
        'with date and time
        MsgBox(theDate)
    End Sub
 
    ''' <summary>
    ''' button click handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnTimeWithSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithSeconds.Click
        'get the time portion of theDate and split it on the "." to remove the milliseconds, return the 0 index item of the string array
        MsgBox(theDate.TimeOfDay.ToString.Split(".")(0))
    End Sub
 
 
    ''' <summary>
    ''' button click handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnTimeWithoutSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithoutSeconds.Click
        'displays the time with only hours and minutes 
        MsgBox(theDate.TimeOfDay.ToString.Split(":")(0) & ":" & theDate.TimeOfDay.ToString.Split(":")(1))
    End Sub
End Class
Public Class Form1

    'make a date variable
    Dim theDate As New DateTime


    ''' <summary>
    ''' form load handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'get the date and time and put it in the variable
        theDate = Now
    End Sub


    ''' <summary>
    ''' button click handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnFullDateTime_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFullDateTime.Click
        'with date and time
        MsgBox(theDate)
    End Sub

    ''' <summary>
    ''' button click handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnTimeWithSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithSeconds.Click
        'get the time portion of theDate and split it on the "." to remove the milliseconds, return the 0 index item of the string array
        MsgBox(theDate.TimeOfDay.ToString.Split(".")(0))
    End Sub


    ''' <summary>
    ''' button click handler
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnTimeWithoutSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithoutSeconds.Click
        'displays the time with only hours and minutes 
        MsgBox(theDate.TimeOfDay.ToString.Split(":")(0) & ":" & theDate.TimeOfDay.ToString.Split(":")(1))
    End Sub
End Class

so as you can see, i basically just handled it like a string and parsed out the part of it i wanted in each case.

one button displays the full date and time

another button displays time only, with seconds

and the third button displays time only, without seconds

I'm not going to code the whole program, I'll leave the retrieval of the datetime object from the MSAccess Database up to you, but here is how you can manipulate it once you've retrieved it to get the value you desire out of it.

cheers :banana:

Nov 12th, 2006, 9:07 AM	#1
nascar2000 Newbie Join Date: Apr 2006 Posts: 9 Rep Power: 0	help hello everybody , i am doing a vb project and needs some help. i currently store the date and time details in access database. i want to retreive the time to a textbox. but when i retreive the time the date also show up. how do i limit to time only thx.

Nov 12th, 2006, 11:57 AM	#2
alphonso Programmer Join Date: Dec 2005 Location: Philippines, where the seasons are: hot, and hotter Posts: 72 Rep Power: 3	Next time, don't put words like "help", "please...", and other words that don't specifically say anything. What was the object you used to call your MS Access file? __________________ "The most incomprehensible idea about the universe is that it is comprehensible" - Albert Einstein

Nov 12th, 2006, 8:02 PM	#4
nascar2000 Newbie Join Date: Apr 2006 Posts: 9 Rep Power: 0	reply what i mean is this. i want to extract the time from the date function. that is one question. the other one is when i extract a time from the database it shows wrong time,which is not stored in my database , could anyof you explain to me why? thx

Nov 13th, 2006, 4:08 AM	#6
alphonso Programmer Join Date: Dec 2005 Location: Philippines, where the seasons are: hot, and hotter Posts: 72 Rep Power: 3	We can take literally hundreds of guesses to your question if you don't have the codes posted __________________ "The most incomprehensible idea about the universe is that it is comprehensible" - Albert Einstein

Nov 13th, 2006, 10:13 AM	#7
melbolt Professional Programmer Join Date: Feb 2005 Location: PA, USA Posts: 254 Rep Power: 4	here's one way to do it vbnet Syntax (Toggle Plain Text) Public Class Form1 'make a date variable Dim theDate As New DateTime ''' <summary> ''' form load handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'get the date and time and put it in the variable theDate = Now End Sub ''' <summary> ''' button click handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub btnFullDateTime_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFullDateTime.Click 'with date and time MsgBox(theDate) End Sub ''' <summary> ''' button click handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub btnTimeWithSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithSeconds.Click 'get the time portion of theDate and split it on the "." to remove the milliseconds, return the 0 index item of the string array MsgBox(theDate.TimeOfDay.ToString.Split(".")(0)) End Sub ''' <summary> ''' button click handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub btnTimeWithoutSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithoutSeconds.Click 'displays the time with only hours and minutes MsgBox(theDate.TimeOfDay.ToString.Split(":")(0) & ":" & theDate.TimeOfDay.ToString.Split(":")(1)) End Sub End Class Public Class Form1 'make a date variable Dim theDate As New DateTime ''' <summary> ''' form load handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'get the date and time and put it in the variable theDate = Now End Sub ''' <summary> ''' button click handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub btnFullDateTime_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFullDateTime.Click 'with date and time MsgBox(theDate) End Sub ''' <summary> ''' button click handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub btnTimeWithSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithSeconds.Click 'get the time portion of theDate and split it on the "." to remove the milliseconds, return the 0 index item of the string array MsgBox(theDate.TimeOfDay.ToString.Split(".")(0)) End Sub ''' <summary> ''' button click handler ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub btnTimeWithoutSeconds_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimeWithoutSeconds.Click 'displays the time with only hours and minutes MsgBox(theDate.TimeOfDay.ToString.Split(":")(0) & ":" & theDate.TimeOfDay.ToString.Split(":")(1)) End Sub End Class so as you can see, i basically just handled it like a string and parsed out the part of it i wanted in each case. one button displays the full date and time another button displays time only, with seconds and the third button displays time only, without seconds I'm not going to code the whole program, I'll leave the retrieval of the datetime object from the MSAccess Database up to you, but here is how you can manipulate it once you've retrieved it to get the value you desire out of it. cheers :banana: __________________ I have never let my schooling interfere with my education. -Mark Twain- Xbox live gamertag: melbolt

Nov 12th, 2006, 1:20 PM	#3
hbe02 Hobbyist Programmer Join Date: Mar 2006 Location: Lebanon Posts: 148 Rep Power: 3	show us some code so we can help.. i have posted something about MSAccess and dates before, you should also search the forums b4 posting.. what are you using ? oledbreader..?

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode