由于，意外掉电，使我的程序里的一个窗体变成了模块，有办法变回来吗？

最近不知怎么搞的，我的机器老是在运行中就自已关掉，再按开关也开不了机，只有把电源插台开关重新打开

，才行，令天，我正在写一个程序，些病又范了。
开机重新运行程序，提示找不到frm*****.log，强行运行，发现frm*****这个窗体变成了模块的图标，而且在

代码里的"通用部分"加上了一些，红色的字,如下。把它们删了也不好使。
Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINNT\System32\stdole2.tlb#OLE

Automation
Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCTL.OCX
Object={C0A63B80-4B21-11D3-BD95-D426EF2C7949}#1.0#0; VSFLEX7L.OCX
Reference=*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\Program Files\Common Files\Microsoft

Shared\DAO\DAO350.DLL#Microsoft DAO 3.51 Object Library
Object={5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0; MSFLXGRD.OCX
Object={67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0; MSADODC.OCX
Object={CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0; MSDATGRD.OCX
Reference=*\G{00000200-0000-0010-8000-00AA006D2EA4}#2.0#0#C:\Program Files\Common

Files\System\ADO\msado20.tlb#Microsoft ActiveX Data Objects 2.0 Library
Object={0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0; MSHFLXGD.OCX
Object={86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCT2.OCX
Object={38911DA0-E448-11D0-84A3-00DD01104159}#1.1#0; COMCT332.OCX
Reference=*\G{6B263850-900B-11D0-9484-00A0C91110ED}#1.0#0#C:\WINNT\System32\MSSTDFMT.DLL#Microsof

t Data Formatting Object Library
Object={DA048F20-8C27-11D1-B6D9-00C04FBBC221}#6.1#0; REPCDLG.OCX
Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; COMDLG32.OCX
Reference=*\G{642AC760-AAB4-11D0-8494-00A0C90DC8A9}#1.0#0#C:\WINNT\System32\MSDBRPTR.DLL#Microsof

t Data Report Designer v6.0
Reference=*\G{3D5C6BF0-69A3-11D0-B393-00A0C9055D8E}#1.0#0#C:\Program Files\Common

Files\designer\MSDERUN.DLL#Microsoft Data Environment Instance 1.0
Object={22BE512E-E6B6-11D2-9BB5-00A0CC3AD9E7}#1.0#0; PVOutlookBar.ocx
Form = FrmMain.frm
Form = FrmSysManage.frm
Form = PeiZiXinXi.frm
Module=Module1; Module1.bas
Form = AddUser.frm
Form = frmPiaoJuCX.frm
等等。
Name = "工程1"
HelpContextID = "0"
CompatibleMode = "0"
MajorVer = 1
MinorVer = 0
RevisionVer = 0
AutoIncrementVer = 0
ServerSupportFiles = 0
VersionCompanyName = "hc"
CompilationType = 0
OptimizationType = 0
FavorPentiumPro(tm) = 0
CodeViewDebugInfo = 0
NoAliasing = 0
BoundsCheck = 0
OverflowCheck = 0
FlPointCheck = 0
FDIVCheck = 0
UnroundedFP = 0
StartMode = 0
Unattended = 0
Retained = 0
ThreadPerObject = 0
MaxNumberOfThreads = 1
等等
[MS Transaction Server]
AutoRefresh = 1

Left = 1920
tabIndex = 44
Top = 2160
Width = 1770
End
Begin VB.TextBox Text3
Alignment = 2 'Center
Appearance = 0 'Flat
Height = 375
Index = 1
Left = 1920
tabIndex = 42
Top = 1800
Width = 1770
End
Begin VB.TextBox Text3
Alignment = 2 'Center
Appearance = 0 'Flat
Height = 375
Index = 0
Left = 1920
tabIndex = 12
Top = 1440
Width = 1725
End