📄 用户申告查询.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{00028C01-0000-0000-0000-000000000046}#1.0#0"; "DBGRID32.OCX"
Object = "{00025600-0000-0000-C000-000000000046}#4.6#0"; "crystl32.ocx"
Begin VB.Form Frmsgcx
BorderStyle = 1 'Fixed Single
Caption = "用户申告查询"
ClientHeight = 6150
ClientLeft = 45
ClientTop = 330
ClientWidth = 11805
Icon = "用户申告查询.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MDIChild = -1 'True
ScaleHeight = 6150
ScaleWidth = 11805
Begin VB.PictureBox Pic1
Height = 6135
Left = 2880
ScaleHeight = 6075
ScaleWidth = 75
TabIndex = 1
Top = 0
Width = 135
End
Begin Crystal.CrystalReport Report1
Left = 10920
Top = 5280
_ExtentX = 741
_ExtentY = 741
_Version = 262150
End
Begin MSComctlLib.ImageList ImageList1
Left = 9840
Top = 5160
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 4
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "用户申告查询.frx":014A
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "用户申告查询.frx":0464
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "用户申告查询.frx":077E
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "用户申告查询.frx":0A98
Key = ""
EndProperty
EndProperty
End
Begin MSComctlLib.TreeView TVw
Height = 6135
Left = 0
TabIndex = 0
Top = 0
Width = 2895
_ExtentX = 5106
_ExtentY = 10821
_Version = 393217
LabelEdit = 1
Style = 7
ImageList = "ImageList1"
Appearance = 1
End
Begin VB.PictureBox Pic2
Height = 6135
Left = 3000
ScaleHeight = 6075
ScaleWidth = 8715
TabIndex = 2
Top = 0
Width = 8775
Begin MSDBGrid.DBGrid DBGrid
Bindings = "用户申告查询.frx":0EEA
Height = 1335
Left = 120
OleObjectBlob = "用户申告查询.frx":0EFE
TabIndex = 3
Top = 720
Width = 8535
End
Begin VB.CheckBox Chkbj
Caption = "开发部信息卡标记"
Height = 375
Left = 2880
TabIndex = 22
Top = 4440
Width = 3255
End
Begin VB.CheckBox Chkcx
Caption = "查询时间"
Height = 255
Left = 120
TabIndex = 21
Top = 0
Width = 1215
End
Begin VB.CommandButton Cmdxx
Caption = "详细信息"
Height = 375
Left = 1320
TabIndex = 18
Top = 5640
Width = 975
End
Begin VB.CommandButton Cmdprint
Caption = "打印"
Height = 375
Left = 4380
TabIndex = 17
Top = 5640
Width = 975
End
Begin VB.CommandButton Cmdexit
Caption = "退出"
Height = 375
Left = 7440
TabIndex = 16
Top = 5640
Width = 1095
End
Begin VB.TextBox Txtsgnr
Height = 1215
Left = 1320
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 15
Top = 3120
Width = 3135
End
Begin VB.TextBox Txtclff
Height = 1215
Left = 5760
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 13
Top = 3120
Width = 2655
End
Begin VB.ComboBox Combojg
Height = 300
Left = 1320
Style = 2 'Dropdown List
TabIndex = 11
Top = 4440
Width = 1335
End
Begin VB.ComboBox Comboclr
Height = 300
Left = 1320
Style = 2 'Dropdown List
TabIndex = 10
Top = 4920
Width = 1335
End
Begin VB.TextBox Txtfwk
Height = 375
Left = 3960
TabIndex = 9
Top = 4920
Width = 2175
End
Begin VB.CheckBox Chkcl
Caption = "处理情况"
Height = 255
Left = 120
TabIndex = 8
Top = 360
Width = 1335
End
Begin VB.ComboBox Combocljg
Height = 300
Left = 1680
Style = 2 'Dropdown List
TabIndex = 7
Top = 360
Width = 1335
End
Begin VB.CommandButton Cmddel
Caption = "删除"
Height = 375
Left = 6600
TabIndex = 6
Top = 4440
Width = 855
End
Begin VB.CommandButton Cmdupdate
Caption = "修改"
Height = 375
Left = 7560
TabIndex = 5
Top = 4440
Width = 855
End
Begin VB.CommandButton Cmdfh
Caption = "返回"
Height = 375
Left = 6600
TabIndex = 4
Top = 4920
Width = 1815
End
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access"
DatabaseName = ""
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = 3360
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 360
Visible = 0 'False
Width = 1215
End
Begin MSComCtl2.DTPicker DTPickclsj
Height = 255
Left = 5760
TabIndex = 12
Top = 2640
Width = 1575
_ExtentX = 2778
_ExtentY = 450
_Version = 393216
CalendarTitleBackColor= 16744576
Format = 23789569
CurrentDate = 38348
End
Begin MSComCtl2.DTPicker DTPicksgsj
Height = 255
Left = 1320
TabIndex = 14
Top = 2640
Width = 1695
_ExtentX = 2990
_ExtentY = 450
_Version = 393216
CalendarTitleBackColor= 16744576
Format = 23789569
CurrentDate = 38348
End
Begin MSComCtl2.DTPicker DTPick2
Height = 255
Left = 5280
TabIndex = 19
Top = 0
Width = 1335
_ExtentX = 2355
_ExtentY = 450
_Version = 393216
Format = 23789569
CurrentDate = 38348
End
Begin MSComCtl2.DTPicker DTPick1
Height = 255
Left = 1680
TabIndex = 20
Top = 0
Width = 1335
_ExtentX = 2355
_ExtentY = 450
_Version = 393216
Format = 23789569
CurrentDate = 38348
End
Begin VB.Line Line1
X1 = 3720
X2 = 4560
Y1 = 120
Y2 = 120
End
Begin VB.Label Label1
Caption = "申告内容"
Height = 180
Left = 480
TabIndex = 33
Top = 3120
Width = 720
End
Begin VB.Label Label2
Caption = "申告时间"
Height = 255
Left = 480
TabIndex = 32
Top = 2640
Width = 735
End
Begin VB.Label Label3
Caption = "处理方法"
Height = 375
Left = 4800
TabIndex = 31
Top = 3120
Width = 855
End
Begin VB.Label Label4
Caption = "处理结果"
Height = 375
Left = 480
TabIndex = 30
Top = 4440
Width = 855
End
Begin VB.Label Label5
Caption = "服务\信息卡"
Height = 375
Left = 2880
TabIndex = 29
Top = 4920
Width = 1095
End
Begin VB.Label Label6
Caption = "处理人"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -