Code Advisor for Visual Basic 6
	Project:		APRS
	Project Path:		C:\Users\Administrator\Documents\dld frms\empmaint\Employee.vbp
	Scope:		Active Project
	Rule Count:		28
	Component Count:		23
	Issue Count:		131
	Report Date:		04/01/2012
	Processing Time:		00:00:23
	Issues		Total Count:131
Architectural Issues Count:10 Remark Component Location Line MSDataReportLib.DataReport will not be upgraded. drContractual drContractual N/A MSDataReportLib.DataReport will not be upgraded. drEOC drEOC N/A MSDataReportLib.DataReport will not be upgraded. drEOCResigned drEOCResigned N/A MSDataReportLib.DataReport will not be upgraded. drProbee drProbee N/A MSDataReportLib.DataReport will not be upgraded. drRegular drRegular N/A MSDataReportLib.DataReport will not be upgraded. drSalary drSalary N/A MSDataReportLib.DataReport will not be upgraded. drSlip drSlip N/A MSDataReportLib.DataReport will not be upgraded. drNHIFr drNHIFr N/A MSDataReportLib.DataReport will not be upgraded. drNSSFr drNSSFr N/A MSDataReportLib.DataReport will not be upgraded. drPAYEr drPAYEr N/A Minor Issues Count:121 Remark Component Location Line Use Option Explicit to avoid implicitly creating variables of type Variant frmChangeUser frmChangeUser.cmdCancel_Click (Proc) N/A Label2.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmChangeUser Label2(Design time) N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmChangeUser Label1(Design time) N/A cmdOK.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmChangeUser cmdOK(Design time) N/A cmdOK.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmChangeUser cmdOK(Design time) N/A cmdCancel.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmChangeUser cmdCancel(Design time) N/A cmdCancel.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmChangeUser cmdCancel(Design time) N/A Use Option Explicit to avoid implicitly creating variables of type Variant frmContract frmContract.empNo_KeyPress (Proc) N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmContract Label1(Design time) N/A Label2.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmContract Label2(Design time) N/A Label3.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmContract Label3(Design time) N/A cmdCancel.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdCancel(Design time) N/A cmdCancel.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdCancel(Design time) N/A cmdSave.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdSave(Design time) N/A cmdSave.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdSave(Design time) N/A cmdEdit.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdEdit(Design time) N/A cmdEdit.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdEdit(Design time) N/A cmdNew.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdNew(Design time) N/A cmdNew.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmContract cmdNew(Design time) N/A ListItems(lvw.SelectedItem.Index property has no Visual Basic .NET equivalent and will not be upgraded. frmContract lvw_DblClick (Proc) 88 Use Option Explicit to avoid implicitly creating variables of type Variant frmEmp frmEmp.Declarations N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label1(Design time) N/A Label2.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label2(Design time) N/A Label3.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label3(Design time) N/A Label4.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label4(Design time) N/A Label5.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label5(Design time) N/A Label6.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label6(Design time) N/A Label7.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label7(Design time) N/A Label8.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label8(Design time) N/A Label9.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label9(Design time) N/A Label11.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label11(Design time) N/A Label13.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label13(Design time) N/A lblUser.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp lblUser(Design time) N/A Label14.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label14(Design time) N/A Label15.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label15(Design time) N/A Label16.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label16(Design time) N/A Label17.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label17(Design time) N/A Label18.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmEmp Label18(Design time) N/A cmdNew.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdNew(Design time) N/A cmdNew.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdNew(Design time) N/A cmdEdit.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdEdit(Design time) N/A cmdEdit.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdEdit(Design time) N/A cmdSave.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSave(Design time) N/A cmdSave.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSave(Design time) N/A cmdCancel.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdCancel(Design time) N/A cmdCancel.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdCancel(Design time) N/A cmdSearch.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSearch(Design time) N/A cmdSearch.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSearch(Design time) N/A cmdReg.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdReg(Design time) N/A cmdReg.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdReg(Design time) N/A cmdSalary.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSalary(Design time) N/A cmdSalary.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSalary(Design time) N/A cmdClose.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdClose(Design time) N/A cmdClose.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdClose(Design time) N/A cmdAddUser.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdAddUser(Design time) N/A cmdAddUser.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdAddUser(Design time) N/A cmdChangeUser.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdChangeUser(Design time) N/A cmdChangeUser.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdChangeUser(Design time) N/A cmdSalar.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSalar(Design time) N/A cmdSalar.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdSalar(Design time) N/A cmdNHIF.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdNHIF(Design time) N/A cmdNHIF.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdNHIF(Design time) N/A cmdNSSF.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdNSSF(Design time) N/A cmdNSSF.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdNSSF(Design time) N/A cmdPIN.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdPIN(Design time) N/A cmdPIN.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmEmp cmdPIN(Design time) N/A Declare 'holder' and 'dHolder' and 'eHolder' with an early-bound data type frmEmp frmEmp.Declarations 2 Use Option Explicit to avoid implicitly creating variables of type Variant frmLog frmLog.cmdCancel_Click (Proc) N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmLog Label1(Design time) N/A Label2.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmLog Label2(Design time) N/A cmdOK.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmLog cmdOK(Design time) N/A cmdOK.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmLog cmdOK(Design time) N/A cmdCancel.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmLog cmdCancel(Design time) N/A cmdCancel.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmLog cmdCancel(Design time) N/A Use Option Explicit to avoid implicitly creating variables of type Variant frmSearchUser frmSearchUser.empFirstname_Change (Proc) N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmSearchUser Label1(Design time) N/A Label2.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmSearchUser Label2(Design time) N/A ListItems(lvw.SelectedItem.Index property has no Visual Basic .NET equivalent and will not be upgraded. frmSearchUser lvw_DblClick (Proc) 120 Use Option Explicit to avoid implicitly creating variables of type Variant frmUser frmUser.Declarations N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label1(Design time) N/A Label2.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label2(Design time) N/A Label3.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label3(Design time) N/A Label4.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label4(Design time) N/A Label5.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label5(Design time) N/A Label6.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label6(Design time) N/A Label7.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmUser Label7(Design time) N/A empStat.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmUser empStat(Design time) N/A cmdSearch.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdSearch(Design time) N/A cmdSearch.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdSearch(Design time) N/A cmdCancel.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdCancel(Design time) N/A cmdCancel.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdCancel(Design time) N/A cmdSave.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdSave(Design time) N/A cmdSave.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdSave(Design time) N/A cmdEdit.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdEdit(Design time) N/A cmdEdit.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdEdit(Design time) N/A cmdNew.MaskColor has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdNew(Design time) N/A cmdNew.Appearance has no Visual Basic .NET equivalent and will not be upgraded. frmUser cmdNew(Design time) N/A Replace 'Trim' function with 'Trim$' function frmUser frmUser.cmdSave_Click (Proc) 119 Replace 'Trim' function with 'Trim$' function frmUser frmUser.cmdSave_Click (Proc) 121 Use Option Explicit to avoid implicitly creating variables of type Variant drContractual drContractual.DataReport_Terminate (Proc) N/A Use Option Explicit to avoid implicitly creating variables of type Variant drRegular drRegular.DataReport_Terminate (Proc) N/A Use Option Explicit to avoid implicitly creating variables of type Variant drSlip drSlip.DataReport_Initialize (Proc) N/A Use Option Explicit to avoid implicitly creating variables of type Variant frmAbout frmAbout.cmdOK_Click (Proc) N/A picIcon.ClipControls has no Visual Basic .NET equivalent and will not be upgraded. frmAbout picIcon(Design time) N/A App.Revision property has no Visual Basic .NET equivalent and will not be upgraded. frmAbout Form_Load (Proc) 14 Use Option Explicit to avoid implicitly creating variables of type Variant frmSplash frmSplash.Form_KeyPress (Proc) N/A Label1.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmSplash Label1(Design time) N/A L.BackStyle has no Visual Basic .NET equivalent and will not be upgraded. frmSplash L(Design time) N/A Use Option Explicit to avoid implicitly creating variables of type Variant daEn daEn.rsCommand1_WillChangeField (Proc) N/A Declare 'Fields' with an early-bound data type daEn daEn.rsCommand1_WillChangeField (Proc) 2 Use Option Explicit to avoid implicitly creating variables of type Variant mod mod.Declarations N/A Use Option Explicit to avoid implicitly creating variables of type Variant frmPay frmPay.checkExist (Proc) N/A Declare 'DisText' with an early-bound data type frmPay frmPay.DisText (Proc) 12 Declare 'EnText' with an early-bound data type frmPay frmPay.EnText (Proc) 25 Use Option Explicit to avoid implicitly creating variables of type Variant frmUsers frmUsers.cmdSelect_Click (Proc) N/A ser.DataSource property has no Visual Basic .NET equivalent and will not be upgraded. frmUsers Form_Load (Proc) 54 Use Option Explicit to avoid implicitly creating variables of type Variant frmDepts frmDepts.cmdCancel_Click (Proc) N/A s.DataSource property has no Visual Basic .NET equivalent and will not be upgraded. frmDepts cmdUpdate_Click (Proc) 136 cmdEdit.Value property has no Visual Basic .NET equivalent and will not be upgraded. frmDepts cmdUpdate_Click (Proc) 157 cmdEdit.Value property has no Visual Basic .NET equivalent and will not be upgraded. frmDepts cmdUpdate_Click (Proc) 169 s.DataSource property has no Visual Basic .NET equivalent and will not be upgraded. frmDepts Form_Load (Proc) 204
	Components	Total Count:23
Name File Names Line Count Issue Count frmChangeUser C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmChangeUser.frm 66 7 frmContract C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmContract.frm 111 13 frmEmp C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmEmp.frm C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmEmp.frx 672 47 frmLog C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmLogin.frm 160 7 frmSearchUser C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmSearchUser.frm 147 4 frmUser C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmUser.frm C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmUser.frx 196 21 daEn C:\Users\Administrator\Documents\dld frms\empmaint\DataEnvironment\daEn.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\DataEnvironment\daEn.dsx 6 2 mod C:\Users\Administrator\Documents\dld frms\empmaint\Module\mod.bas 46 1 drContractual C:\Users\Administrator\Documents\dld frms\empmaint\Report\drEmp.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drEmp.dsx 4 2 drEOC C:\Users\Administrator\Documents\dld frms\empmaint\Report\drEOC.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drEOC.dsx 0 1 drEOCResigned C:\Users\Administrator\Documents\dld frms\empmaint\Report\drEOCRes.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drEOCRes.dsx 0 1 drProbee C:\Users\Administrator\Documents\dld frms\empmaint\Report\drProbitionary.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drProbitionary.dsx 0 1 drRegular C:\Users\Administrator\Documents\dld frms\empmaint\Report\drReg.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drReg.dsx 5 2 drSalary C:\Users\Administrator\Documents\dld frms\empmaint\Report\drSal.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drSal.dsx 0 1 frmPay C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmPay.frm C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmPay.frx 242 3 drSlip C:\Users\Administrator\Documents\dld frms\empmaint\Report\drslip.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drslip.dsx 4 2 frmUsers C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmUsers.frm 89 2 frmAbout C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmAbout.frm C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmAbout.frx 18 3 frmDepts C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmDepts.frm 221 5 drNHIFr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drNHIFr.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drNHIFr.dsx 0 1 drNSSFr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drNSSFr.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drNSSFr.dsx 0 1 drPAYEr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drPAYEr.Dsr C:\Users\Administrator\Documents\dld frms\empmaint\Report\drPAYEr.dsx 0 1 frmSplash C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmSplash.frm C:\Users\Administrator\Documents\dld frms\empmaint\Forms\frmSplash.frx 33 3
	Rules	Total Count:28
Name Description Issue Count Late Binding of Variant or Object Variables, parameters, and return values typed as Variant or Object can cause problems when upgrading. 4 Missing Option Explicit When Option Explicit is missing from the Declarations area of a module, your code can implicitly create new variables of type Variant without declaring them. 16 Soft Binding of Form or Control Variables declared as Form or Control can cause problems when upgrading, if used with properties or methods defined only for particular form and control classes. This 'soft binding' is not supported in Visual Basic .NET. 0 Soft Binding using ActiveForm and ActiveControl ActiveForm and ActiveControl can cause problems when upgrading, if used with properties or methods defined only for particular form and control classes. This 'soft binding' is not supported in Visual Basic .NET. 0 Variant-Returning String Function Variant-returning string functions are not supported in Visual Basic .NET. Use the String-returning version of the function, which has a '$' suffix. 2 LSet Not Supported for User-Defined Types The LSet function can only be used with strings in Visual Basic .NET. 0 OLE Control Not Upgraded The OLE container control has no equivalent in Visual Basic .NET Windows Forms. 0 No Line Control in Visual Basic .NET There is no Line control in Visual Basic .NET. Horizontal and vertical Line controls are converted to Visual Basic .NET Label controls. Diagonal lines are not upgraded to Visual Basic .NET. 0 No Shape Control in Visual Basic .NET Shape Controls have no equivalent in Visual Basic .Net and will not be upgraded. 0 UpDown Control Not Upgraded UpDown controls are not upgraded to Visual Basic .NET by the Upgrade Wizard. 0 Property/Method/Events Not Upgraded Certain properties, methods and events of Visual Basic 6.0 controls are not upgraded to Visual Basic .NET by the Upgrade Wizard. 99 Non Zero Lowerbound Arrays Not Supported Visual Basic .NET does not support the use of arrays that have a lower-bound index other than zero. 0 Incorrect Use Of Enumeration Incorrectly used enumeration constants will not up upgraded. 0 As Any Not Supported API Declare statements that include parameters typed using 'As Any' will not be upgraded. 0 Changing <property> Not Supported Changing <property> at runtime is not supported in Visual Basic .NET. 0 Property Page Not Upgraded Property Page project items are not upgraded. 0 Designer Not Upgraded Some Visual Basic Designers are not upgraded: DHTMLPage, DataEnvironment ChildCommand, UserConnection, DataReport 10 Missing/Corrupt Reference or Component A reference or component in the active project is missing or corrupt. 0 Non-TrueType Font Not Supported Non-TrueType fonts are not supported in Visual Basic .NET Windows Forms. The only non-TrueType font that is upgraded is MS Sans Serif. 0 Keyword Not Supported The following keywords are not supported in Visual Basic .NET: GoSub, Option Base 1, LSet, ObjPtr, VarPtr, StrPtr, DefBool, DefByte, DefInt, DefLng, DefCur, DefSng, DefDbl, DefDec, DefDate, DefStr, DefObj, DefVar, ChrB, ChrW, MidB, RightB, LeftB 0 Return Has New Meaning In Visual Basic .NET, Return is used to exit a subroutine and to return a value in a function. GoSub...Return is not supported. 0 Option Base 1 is not supported In Visual Basic .NET, Option Base 1 is not supported. 0 On ... GoTo is not supported In Visual Basic .NET, On ... GoTo is not supported. 0 DAO Data Binding DAO data binding is deprecated in Visual Basic 6. Consider using ADO data binding instead. 0 RDO Data Binding Replace RDO data binding with ADO 0 '#If' blocks are not reliably upgraded When a #If condition evaluates to False, the #If...#End If block is not upgraded. The Upgrade Wizard does not reliably evaluate whether #If conditions are True or False. 0 Printer Object and Printers Collection Not Upgraded The Printer object and Printers collection aren't upgraded to Visual Basic .NET by the Upgrade Wizard. 0 Single Threaded Controls Controls designed for Visual Basic 6 have better performance , since they are apartment threaded. 0