[2 days left] What’s wrong with your cloud strategy? Learn why multicloud solutions matter with Nimble Storage.Register Now

x
Solved

# dtp value

Posted on 2004-10-12
Medium Priority
204 Views
I've got a date time picker control array.
When I run my app, (0) is set by default as 12:00 AM and (1) as 1:00 AM
But if I step through my code,
(0) contains the value of 11/30/1999 while (1) contains 1:00 AM as expected.

Any clue as to why?
0
Question by:sirbounty
[X]
###### Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

• Help others & share knowledge
• Earn cash & points
• 5
• 2

LVL 32

Expert Comment

ID: 12288345
Is the .Format property set to dtpTime?
0

LVL 67

Author Comment

ID: 12288385
Nope - they're both custom.
0

LVL 67

Author Comment

ID: 12288399
Sorry - to clarify that custom format:

hh:mm tt
0

LVL 16

Expert Comment

ID: 12288637
If you convert the value returned by the dtp to a double, with CDbl(yourdtpvalue), is it an integer number or is it divisible by 86400?

There are 86400 seconds in a day and this can cause problems:

0 seconds = the exact date
1.0 days = an exact date
1 second = 12:01:00AM

(I'm not explaining myself too well here, am I)

Try calculating the following:

CDate (yourdtpvalue - Int(yourdtpvalue))

Does this return the correct times?

J.
0

LVL 67

Author Comment

ID: 12288786
debug.? CDate (dtpTime(0)- Int(dtpTime(0)))
returns
12:00:00 AM

as expected.

Right now, my workaround is:

dtpTime(0) = TimeValue(dtpTime(0))

Although I'd like to know why I need this only on the first element...
0

LVL 16

Accepted Solution

jimbobmcgee earned 1000 total points
ID: 12296609
12AM is always going to be an issue -- it all comes down to how VB processes dates:

Imagine every day represented as a number (take, for example, today is 5 -- it's not, but let's pretend)
Now each hour in that day is a fraction -- 1/24 (or 0.0416r) in this case.

Today = 5
Today, 1AM = 5.0416r
Today, 2AM = 5.083r
Today, 3AM = 5.125
etc...

Take Today, 2AM:  VB handles the 'whole number' part of these value (the 5) and says that _that_ is the date.  It then takes the 'decimal' part of the value (0.083r) and says that _that_ is the time.

In your case, VB is trying to give you a date/time variable from the value of 12AM.  The problem is, that as 12AM is the 0th hour of the day, the 'decimal' part that it's using to give you the time is 0.0.

0.0 is the same as 0, so when you are converting to date/time form, it is taking that 0 and saying that this value is a 'whole number', so this date/time is a 'whole date'.

When you ask VB to print 5.0000, it prints 5.  Likewise, when you ask it to print 12/05/2004 00:00:00, it prints 12/05/2004.

You may ask, why are you getting this effect when you are only trying to deal with time.

The answer is its a caveate of a by-design feature.  The handling of time only assumes a date 'value' of 0 -- if you do

Print CDate(0)

you will get the earliest date that your computer can handle (mine returns 31/12/1899).  If you do

Print CDate(0.041666666)

you will get the earliest date your computer can handle + 1hr (mine returns 31/12/1899 01:00:00).

dtpTime(0) = TimeValue(dtpTime(0))

is the correct way of disregarding dates when dealing with date/time values.  You should do this every time you handle a dtp value.

HTH

J.
0

LVL 67

Author Comment

ID: 12346817
Thanx for the explanation.  Now, for clarification, although redundant - should I also set the ending time to be Timevalue(dtpTime(1))??
0

LVL 67

Author Comment

ID: 12567066
Sorry for the delay...I was hoping I'd get a response on my last clarification question, but oh well...
0

## Featured Post

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
If you have ever used Microsoft Word then you know that it has a good spell checker and it may have occurred to you that the ability to check spelling might be a nice piece of functionality to add to certain applications of yours. Well the code that…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
###### Suggested Courses
Course of the Month14 days, 8 hours left to enroll