关于一个程序~大家新年快乐

Question

我之前的一个程序，一直都用的好好的，半年没打开COMMANDBUTTON变成这样了，也无法运行了，提示未找到方法或数据等，为啥会变成这样啊，哭死我了~~有办法解决么，多谢各位大神！新年快乐

Answer 1

[Root]
Most Recent Package=标准安装软件包 1
[Package|标准安装软件包 1|Root]
SubWizProgID=PDWizard.SetupPkgSubWiz
BuildFolder=C:\Documents and Settings\fish\桌面\安装文件[Package|标准安装软件包 1|Configure DAO ISAMs]
Applicable=No[Package|标准安装软件包 1|Configure DAO ODBC]
JetWorkspace=
ODBCDirect=[Package|标准安装软件包 1|Files Found][Package|标准安装软件包 1|Files Released][Package|标准安装软件包 1|Missing Dependency Information][Package|标准安装软件包 1|Out-of-Date Dependency Information][Package|标准安装软件包 1|Files Added][Package|标准安装软件包 1|Files Removed][Package|标准安装软件包 1|Files In Project]
C:\Documents and Settings\fish\桌面\数据库\工程1.exe=Yes
C:\WINDOWS\system32\Msvbvm60.dll=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\OLEAUT32.DLL=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\OLEPRO32.DLL=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\ASYCFILT.DLL=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\STDOLE2.TLB=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\COMCAT.DLL=Yes
C:\WINDOWS\system32\VB6CHS.DLL=Yes
C:\Program Files\Common Files\Microsoft Shared\DAO\dao360.dll=Yes
C:\WINDOWS\system32\msjet40.dll=Yes
C:\WINDOWS\system32\msjter40.dll=Yes
C:\WINDOWS\system32\msjint40.dll=Yes
C:\WINDOWS\system32\vbajet32.dll=Yes
C:\WINDOWS\system32\expsrv.dll=Yes
C:\WINDOWS\system32\mswstr10.dll=Yes
C:\WINDOWS\system32\mswdat10.dll=Yes
C:\WINDOWS\system32\msrd2x40.dll=Yes
C:\WINDOWS\system32\msrd3x40.dll=Yes
C:\WINDOWS\system32\msrepl40.dll=Yes
C:\WINDOWS\system32\msjtes40.dll=Yes
C:\WINDOWS\system32\VB5DB.DLL=Yes
C:\WINDOWS\system32\MSBIND.DLL=Yes
C:\WINDOWS\system32\MSSTDFMT.DLL=Yes
C:\WINDOWS\system32\STDFTCHS.DLL=Yes
C:\WINDOWS\system32\FM20.DLL=Yes
C:\WINDOWS\system32\MSADODC.OCX=Yes
C:\WINDOWS\system32\ADODCCHS.DLL=Yes
C:\WINDOWS\system32\MSHFLXGD.OCX=Yes
C:\WINDOWS\system32\MSHFGCHS.DLL=Yes
C:\WINDOWS\system32\TABCTL32.OCX=Yes
C:\WINDOWS\system32\TABCTCHS.DLL=Yes
C:\WINDOWS\system32\MSDATGRD.OCX=Yes
C:\WINDOWS\system32\DATGDCHS.DLL=Yes
C:\WINDOWS\system32\RICHTX32.OCX=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\RICHED32.DLL=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\GAPI32.DLL=Yes
C:\WINDOWS\system32\RCHTXCHS.DLL=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\MDAC_TYP.EXE=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\SETUP.EXE=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\SETUP1.EXE=Yes
C:\WINDOWS\system32\VB6STKIT.DLL=Yes
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\ST6UNST.EXE=Yes[Package|标准安装软件包 1|Configure Registry Files]
Applicable=No[Package|标准安装软件包 1|Configure Remote Servers]
Applicable=No[Package|标准安装软件包 1|Install Locations]
C:\Documents and Settings\fish\桌面\数据库\工程1.exe=$(AppPath)
C:\WINDOWS\system32\Msvbvm60.dll=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\OLEAUT32.DLL=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\OLEPRO32.DLL=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\ASYCFILT.DLL=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\STDOLE2.TLB=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\COMCAT.DLL=$(WinSysPathSysFile)
C:\WINDOWS\system32\VB6CHS.DLL=$(WinSysPath)
C:\Program Files\Common Files\Microsoft Shared\DAO\dao360.dll=$(MSDAOPath)
C:\WINDOWS\system32\msjet40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\msjter40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\msjint40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\vbajet32.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\expsrv.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\mswstr10.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\mswdat10.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\msrd2x40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\msrd3x40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\msrepl40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\msjtes40.dll=$(WinSysPathSysFile)
C:\WINDOWS\system32\VB5DB.DLL=$(WinSysPath)
C:\WINDOWS\system32\MSBIND.DLL=$(WinSysPath)
C:\WINDOWS\system32\MSSTDFMT.DLL=$(WinSysPath)
C:\WINDOWS\system32\STDFTCHS.DLL=$(WinSysPath)
C:\WINDOWS\system32\FM20.DLL=$(WinSysPath)
C:\WINDOWS\system32\MSADODC.OCX=$(WinSysPath)
C:\WINDOWS\system32\ADODCCHS.DLL=$(WinSysPath)
C:\WINDOWS\system32\MSHFLXGD.OCX=$(WinSysPath)
C:\WINDOWS\system32\MSHFGCHS.DLL=$(WinSysPath)
C:\WINDOWS\system32\TABCTL32.OCX=$(WinSysPath)
C:\WINDOWS\system32\TABCTCHS.DLL=$(WinSysPath)
C:\WINDOWS\system32\MSDATGRD.OCX=$(WinSysPath)
C:\WINDOWS\system32\DATGDCHS.DLL=$(WinSysPath)
C:\WINDOWS\system32\RICHTX32.OCX=$(WinSysPath)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\RICHED32.DLL=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\GAPI32.DLL=$(WinSysPathSysFile)
C:\WINDOWS\system32\RCHTXCHS.DLL=$(WinSysPath)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\MDAC_TYP.EXE=$(AppPath)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\SETUP.EXE=$(AppPath)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\SETUP1.EXE=$(WinPath)
C:\WINDOWS\system32\VB6STKIT.DLL=$(WinSysPathSysFile)
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\ST6UNST.EXE=$(WinPath)[Package|标准安装软件包 1|Configure Shared Files]
Applicable=Yes
C:\Documents and Settings\fish\桌面\数据库\工程1.exe=No
D:\vb\Microsoft Visual Studio\VB98\Wizards\PDWizard\Redist\MDAC_TYP.EXE=No[Package|标准安装软件包 1|Distribution]
Type=single
Size=
Title=龍勝2011版[Package|标准安装软件包 1|IconGroups]
Group0=龍勝2011版
PrivateGroup0=-1
Parent0=$(Programs)[Package|标准安装软件包 1|龍勝2011版]
Icon1=工程1.exe
Title1=龍勝2011版
StartIn1=$(AppPath)
Key1=Icon1[Package|标准安装软件包 1|Package]
PackageFolder=C:\Documents and Settings\fish\桌面\安装文件
ProjectFolder=C:\Documents and Settings\fish\桌面\数据库
ServerSideCab=
File1=C:\Documents and Settings\fish\桌面\安装文件\setup.exe
File2=C:\Documents and Settings\fish\桌面\安装文件\Setup.Lst
File3=C:\Documents and Settings\fish\桌面\安装文件\工程1.CAB
Handler1=PDWizard.FolderDplySubWiz
Handler2=PDWizard.WebPostDplySubWiz
大神，然后呢

Answer 2

行 151: 控件 CommandButton50 的类 MSForms.CommandButton 不是一个已加载的控件类。
行 250: 控件 RichTextBox1 的类 RichTextLib.RichTextBox 不是一个已加载的控件类。
行 280: 控件 MSHFlexGrid1 的类 MSHierarchicalFlexGridLib.MSHFlexGrid 不是一个已加载的控件类。
行 333: 控件 CommandButton49 的类 MSForms.CommandButton 不是一个已加载的控件类。

Answer 3

RichTextBox 
MSHFlexGrid 
两个类应该是没有引用或者注册
CommandButton正常应该是不会有问题的
你把这两个50和49先删了看看

Answer 4

重新注册了还是报错，我只是列了一点，CommandButton还有N个提示错误我狂晕，快帮帮我吧！！！

Answer 5

你这个情况有可能是你工程的VBP文件里控件的部分出错了
很麻烦,
你实在不行可以复制代码到新工程里,然后把代码复制过去.

Answer 6

看你在3楼中的内容，好像是 .NET 的工程？
（请原谅我没有使用过 .NET 的开发环境搞过VB工程，现在的办公电脑也没条件安装 MS的 VS .NET 20xx ）你的操作系统是升级到 Win7、8、10之类的后，才出的问题吧？
要先“以管理员身份运行”一次你的开发环境，创建一个新工程，然后把你要用到的第三方控件全部“引用”一次，也许问题就解决了。
注意，一定要鼠标右键→以管理员身份运行，不是在“有管理员权限”的账号下直接启动就了事的。