|
-
Mar 26th, 2002, 03:20 PM
#1
Thread Starter
Member
Help
I have 2 text boxes and one lable box tied into a timer and a command button and also a check box. The check box indicates that an employee is in their 90 day probation period if it is checked. So when I click on the command button it will check to see if the check box is checked and if it is checked it will then put the word "yes" in the first text box to indicate that the employee is in probation and then in the second text box it will put in today's date or the current date when the check box is checked. It will also put the number of days that the employee has been on probation in the label box. Once that label box has reached 90 days it is to clear out the two text boxes and the label box since the probation is to only last 90 days. My problem is that when todays date is put into the text box it is supposed to say that they have been on probation for zero days so far but instead it just clears out the text boxes and the label box. I'm wondering if maybe it is not accepting the value 0 in the label box because if I go in and manually type in yesterdays date it will then hold the text and will put 1 in the label box since they have been on probation for 1 day so far, so I'm really confused as to why these boxes clear out when todays date is automatically put in there and I need it to hold the information in there. Can anyone help me with this frustration?
-
Mar 26th, 2002, 03:37 PM
#2
Frenzied Member
Please post your code....it would be much easier tha way!
-
Mar 26th, 2002, 03:38 PM
#3
Thread Starter
Member
Help
Oh yeah I forgot to add that when I type in todays date in the text box it will hold that and also show "0" in the label box and hold it so I'm thinkin ther may be a problem with the timer code. Here is what I have in there.
Private Sub Timer2 Timer ()
Dim lDaysPassed As Long
lDaysPassed = DateDiff("d", gf_dtPsd, Now)
lblProbCounter.Caption = Cstr(lDaysPassed)
If lblProbCounter >=90 Then
TextProb.Text = ""
TextStartDt.Text = ""
lblProbCounter.Caption = ""
Timer2.Enabled = False
Else
End If
End Sub
(Note) The timer is enabled in the Command button code
-
Mar 26th, 2002, 04:07 PM
#4
Thread Starter
Member
Help
Does anyone have any idea about this?
-
Mar 26th, 2002, 04:35 PM
#5
Thread Starter
Member
Help
Anyone anyone at all?? Please?
-
Mar 26th, 2002, 05:38 PM
#6
Hyperactive Member
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|