Solved

# GET TOTAL TIME

Posted on 2004-04-16
175 Views
hey guys i juss wanna ask ur help getting the total time of my project... in my table, i have datetime_in, datetime_out, total_time...

e.g
datetime_in= 04/17/04 10:00:00 AM
datetime_out=04/23/04 10:00:00 PM
total_time=?

thanks
0
Question by:zack_online
• 2
• 2

LVL 76

Expert Comment

ID: 10848056
Hi zack_online,
>
Total_Time = DateTime_Out - DateTime_In
(all three should be declared as Date type)
Cheers!
0

Author Comment

ID: 10848241
tnx 4 d reply... how do i get the result in vb? can u gimme a simple sample of this...

tnx again
0

LVL 1

Expert Comment

ID: 10848397
Dim datetime_in As Date
Dim datetime_out As Date
Dim total_time As Long

datetime_in = #4/17/2004 10:00:00 AM#
datetime_out = #4/23/2004 10:00:00 PM#

total_time = DateDiff("d", datetime_in, datetime_out)

MsgBox total_time

The first parameter "d" indicates how accurate you want the answer.  "d" for days "h" for hours See Help for other settings.

The program above shows 6 ie 6 days.

"h" gives 156 hours.  This will need further manipulation, ie dividing by 24, to get Days &  Hours

0

LVL 76

Accepted Solution

GrahamSkan earned 200 total points
ID: 10848416
I'm having trouble understanding you, but I hope this is what you need. It also demonstrates the DateDiff function which shows the elapsed time in particular units, seconds in this case.

Private Sub Command1_Click()
Dim DateTime_In As Date
Dim DateTime_Out As Date
Dim Total_Time As Date

DateTime_In = Now()
MsgBox "Hello Zack"

DateTime_Out = Now()
Total_Time = DateTime_Out - DateTime_In
MsgBox "Time to respond was " & Total_Time & " or " & DateDiff("s", DateTime_In, DateTime_Out) & " seconds"
End Sub

0

Author Comment

ID: 10856164
tnx for answering my Q.
0

## Join & Write a Comment Already a member? Login.

### Suggested Solutions

I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
Introduction In a recent article (http://www.experts-exchange.com/A_7811-A-Better-Concatenate-Function.html) for the Excel community, I showed an improved version of the Excel Concatenate() function.  While writing that article I realized that no o…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

#### 743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

#### Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!