Question about Computers & Internet
I am trying to compile a source code of vb6 name building the time tracking system. The problem is somewhere in procedure. Kindly let me know the solution. The code is
Private Sub cmdOK_Click()
Dim sngBilledTime As Single, iMinutes As Integer, iHours As Integer
Dim iResponse As Integer
If txtAmountOfTime.Text = "0.00" Then
Msgbox "Your must enter the time spent."
ElseIf txtBillingRate.Text <= 0 Then
Msgbox " You must enter the Billing Rate."
ElseIf lblBillingName.Caption = " " Then
lblBillingName.Caption = InputBox("Please enter your name:")
iResponse = Msgbox("Do you want to perview the invoice?", vbYesNo, "Invoice")
If iResponse = vbNo Then
.lblBilledBy .Caption = frmBillingInfor.lblBillingName
.lblClient .Caption = frmBillingInfo.lstClient.Text
.lblDate .Caption = frmBillingInfo.mskDate.Text
.lblRate.Caption = Format(frmBillingInfo.txtBillingRate.Text, "Rs ####.00")
.lblWorkCategory .Caption = frmBillingInfo.cboCategory.Text
If frmBillingInfo.optByHour.Value = True Then
.lblHourOrJob.Caption = "an Hour"
iMinutes = Val(Right(Me.textAmountOfTime.Text, 2))
iHours = Left(Me.txtAmountOfTime.Text, (InStr(1, Me.txtAmountOfTime.Text, ":") - 1))
Select Case iMinutes
Case Is < 15
If iHours > 0 Then
sngBilledTime = iHours
sngBilledTime = 0.5
Case Is >= 15 And iMinutes <= 30
sngBilledTime = iHours + 0.5
Case Is > 15 And iMinutes <= 30
sngBilledTime = iHours + 1
.lblTotalAmount.Caption = Format(frmBillingInfo.txtBillingRate.Text * sngBilledTime, "Rs####.00")
.lblTotalTime.Caption = sngBilledTime
.lblHourOrJob = "form item"
.lblTotalTime = "N/A"
.lblTotalAmount = Format(.lblRate.Caption, "Rs####/00")
On compilation the message "invalid use of property" is coming and invoice window is not displayed.
What the heck are you compiling it with that doesn't give a line number for that error? Pay attention to the titles of messageboxes! Perhaps noting what lines you changed from the original will give a clue to narrow it down, but I expect you addressed an object with a property (object.property) in a context that can't be expected to generate or use that property as you gave it. Moreover there are spaces in object names, it seems....
Posted on Jun 10, 2008
a 6ya expert can help you resolve that issue over the phone in a minute or two.
best thing about this new service is that you are never placed on hold and get to talk to real repairmen in the US.
the service is completely free and covers almost anything you can think of (from cars to computers, handyman, and even drones).
click here to download the app (for users in the US for now) and get all the help you need.
Posted on Jan 02, 2017
Tips for a great answer:
Feb 17, 2011 | Microsoft Visual Basic 6.0 for PC
Mar 08, 2010 | Computers & Internet
Aug 18, 2009 | Microsoft Computers & Internet
Jul 11, 2009 | Microsoft Visual Basic Enterprise Edition...
Jun 27, 2009 | Microsoft Computers & Internet
Mar 20, 2009 | Microsoft Visual Basic Professional...
Mar 15, 2009 | Microsoft Visual Basic 6.0 for PC
Feb 28, 2009 | Microsoft Visual Basic 6.0 for PC
87 people viewed this question
Usually answered in minutes!