macauley
asked on
VB6 help please: Need help to find out the tomorow remaining hours for a driver who can not drive more than 60 hour a week
Hello This is the Code I have and I am only a beginner please tell me where I am going wrong. Thanks
Private Sub cmdCompute_Click()
TotalHrs = 0 + 1 + 2 + 3 + 4 + 5
intTomRemHrs = 60 - TotalHrs
End Sub
Private Sub cmdExit_Click()
Load Me
End Sub
Private Sub TodayDateHrs_Change()
Dim intHrs(6) As Integer
TodayDateHrs = 0
OneDayAgoHrs = 1
TwoDaysAgoHrs = 2
ThreeDaysAgoHrs = 3
FourDaysAgoHrs = 4
FiveDaysAgoHrs = 5
End Sub
Private Sub TomRemHrs_Change()
Dim intTomRemHrs As Integer
End Sub
Any help is appreciated thanks.
Private Sub cmdCompute_Click()
TotalHrs = 0 + 1 + 2 + 3 + 4 + 5
intTomRemHrs = 60 - TotalHrs
End Sub
Private Sub cmdExit_Click()
Load Me
End Sub
Private Sub TodayDateHrs_Change()
Dim intHrs(6) As Integer
TodayDateHrs = 0
OneDayAgoHrs = 1
TwoDaysAgoHrs = 2
ThreeDaysAgoHrs = 3
FourDaysAgoHrs = 4
FiveDaysAgoHrs = 5
End Sub
Private Sub TomRemHrs_Change()
Dim intTomRemHrs As Integer
End Sub
Any help is appreciated thanks.
I can't see what your code is supposed to do. What are you trying to do?
ASKER
I need to find otu to find out the tomorow remaining hours for a driver who can not drive more than 60 hour a week
ASKER
may be my question look awkward but it will be great if you can help, my question is : i drive only sixty hours a week, so the program should ask me about my hrs today, then the program will adds the total hrs for six past consecutive days including to day, then the program will deduct that total from sixty, the remainder is the hrs available for tomorow to be displayed, sorry if i am too fussy
is this an assignment?
ASKER
No it is not. It is something I am playing with for hobby as I do an elearning course.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
I uploaded a program check it out ...
Post if you have questions
ASKER
Thank you JackOfPH. Your sample does exactly what I was lookign for, now I will be able to review it and see where I was way off.
Thank you.
Thank you.