📄 form1.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0"; "FM20.DLL"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form findHistory
BackColor = &H00FFC0C0&
Caption = "来往记录查询"
ClientHeight = 9315
ClientLeft = 60
ClientTop = 750
ClientWidth = 15120
Icon = "Form1.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MDIChild = -1 'True
ScaleHeight = 9315
ScaleWidth = 15120
Begin TabDlg.SSTab SSTab1
Height = 8655
Left = 480
TabIndex = 0
Top = 390
Width = 14085
_ExtentX = 24844
_ExtentY = 15266
_Version = 393216
Tab = 2
TabHeight = 520
BackColor = 12648447
TabCaption(0) = " 简单查询"
TabPicture(0) = "Form1.frx":0CCA
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "findHistory"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Label2"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Label3"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "simpleKeyWord"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "simpleCombo"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).Control(5)= "simpleCZ"
Tab(0).Control(5).Enabled= 0 'False
Tab(0).Control(6)= "lv"
Tab(0).Control(6).Enabled= 0 'False
Tab(0).ControlCount= 7
TabCaption(1) = " 组合查询"
TabPicture(1) = "Form1.frx":367C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Label9"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).Control(1)= "Label8"
Tab(1).Control(1).Enabled= 0 'False
Tab(1).Control(2)= "CheckBox2(1)"
Tab(1).Control(2).Enabled= 0 'False
Tab(1).Control(3)= "CheckBox2(6)"
Tab(1).Control(3).Enabled= 0 'False
Tab(1).Control(4)= "CheckBox2(5)"
Tab(1).Control(4).Enabled= 0 'False
Tab(1).Control(5)= "CheckBox2(4)"
Tab(1).Control(5).Enabled= 0 'False
Tab(1).Control(6)= "CheckBox2(3)"
Tab(1).Control(6).Enabled= 0 'False
Tab(1).Control(7)= "CheckBox2(2)"
Tab(1).Control(7).Enabled= 0 'False
Tab(1).Control(8)= "CheckBox2(7)"
Tab(1).Control(8).Enabled= 0 'False
Tab(1).Control(9)= "Label4"
Tab(1).Control(9).Enabled= 0 'False
Tab(1).Control(10)= "Shape4"
Tab(1).Control(10).Enabled= 0 'False
Tab(1).Control(11)= "Shape5"
Tab(1).Control(11).Enabled= 0 'False
Tab(1).Control(12)= "lv1"
Tab(1).Control(12).Enabled= 0 'False
Tab(1).Control(13)= "fixKeyWord"
Tab(1).Control(13).Enabled= 0 'False
Tab(1).Control(14)= "fixCZ"
Tab(1).Control(14).Enabled= 0 'False
Tab(1).Control(15)= "cmdAll"
Tab(1).Control(15).Enabled= 0 'False
Tab(1).Control(16)= "cmdCancel"
Tab(1).Control(16).Enabled= 0 'False
Tab(1).ControlCount= 17
TabCaption(2) = " 逻辑组合查询"
TabPicture(2) = "Form1.frx":5386
Tab(2).ControlEnabled= -1 'True
Tab(2).Control(0)= "Shape1"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).Control(1)= "Shape2"
Tab(2).Control(1).Enabled= 0 'False
Tab(2).Control(2)= "Shape3"
Tab(2).Control(2).Enabled= 0 'False
Tab(2).Control(3)= "Label12"
Tab(2).Control(3).Enabled= 0 'False
Tab(2).Control(4)= "Label13"
Tab(2).Control(4).Enabled= 0 'False
Tab(2).Control(5)= "Label14"
Tab(2).Control(5).Enabled= 0 'False
Tab(2).Control(6)= "Label1"
Tab(2).Control(6).Enabled= 0 'False
Tab(2).Control(7)= "cmdClear"
Tab(2).Control(7).Enabled= 0 'False
Tab(2).Control(8)= "logicKeyWord3"
Tab(2).Control(8).Enabled= 0 'False
Tab(2).Control(9)= "logicCombo3"
Tab(2).Control(9).Enabled= 0 'False
Tab(2).Control(10)= "logicCZ"
Tab(2).Control(10).Enabled= 0 'False
Tab(2).Control(11)= "logicKeyWord2"
Tab(2).Control(11).Enabled= 0 'False
Tab(2).Control(12)= "logicCombo2"
Tab(2).Control(12).Enabled= 0 'False
Tab(2).Control(13)= "logicKeyWord1"
Tab(2).Control(13).Enabled= 0 'False
Tab(2).Control(14)= "logicCombo1"
Tab(2).Control(14).Enabled= 0 'False
Tab(2).Control(15)= "logicCombo4"
Tab(2).Control(15).Enabled= 0 'False
Tab(2).Control(16)= "logicCombo5"
Tab(2).Control(16).Enabled= 0 'False
Tab(2).Control(17)= "lv2"
Tab(2).Control(17).Enabled= 0 'False
Tab(2).ControlCount= 18
Begin VB.CommandButton cmdCancel
Caption = "全部取消"
Height = 360
Left = -68100
TabIndex = 37
Top = 2070
Width = 1110
End
Begin VB.CommandButton cmdAll
Caption = "全部选中"
Height = 390
Left = -68100
TabIndex = 36
Top = 1500
Width = 1095
End
Begin VB.CommandButton fixCZ
Caption = "查询"
Height = 735
Left = -62850
TabIndex = 25
Top = 1650
Width = 1275
End
Begin VB.TextBox fixKeyWord
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = -65550
TabIndex = 24
Top = 1950
Width = 2280
End
Begin MSComctlLib.ListView lv2
Height = 5205
Left = 330
TabIndex = 21
Top = 3195
Width = 13515
_ExtentX = 23839
_ExtentY = 9181
View = 3
LabelEdit = 1
MultiSelect = -1 'True
LabelWrap = -1 'True
HideSelection = -1 'True
Checkboxes = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = 12648447
BorderStyle = 1
Appearance = 0
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 0
End
Begin MSComctlLib.ListView lv1
Height = 5025
Left = -74775
TabIndex = 20
Top = 3300
Width = 13620
_ExtentX = 24024
_ExtentY = 8864
View = 3
LabelEdit = 1
MultiSelect = -1 'True
LabelWrap = -1 'True
HideSelection = -1 'True
Checkboxes = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = 12648447
BorderStyle = 1
Appearance = 0
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 0
End
Begin MSComctlLib.ListView lv
Height = 5700
Left = -74745
TabIndex = 19
Top = 2655
Width = 13560
_ExtentX = 23918
_ExtentY = 10054
View = 3
Arrange = 1
LabelEdit = 1
MultiSelect = -1 'True
LabelWrap = -1 'True
HideSelection = -1 'True
Checkboxes = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = 12648447
BorderStyle = 1
Appearance = 0
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 0
End
Begin VB.ComboBox logicCombo5
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 7470
TabIndex = 15
Text = "且"
Top = 1725
Width = 630
End
Begin VB.ComboBox logicCombo4
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 3705
TabIndex = 14
Text = "且"
Top = 1740
Width = 810
End
Begin VB.ComboBox logicCombo1
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 1260
TabIndex = 13
Top = 1530
Width = 2070
End
Begin VB.TextBox logicKeyWord1
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 1245
TabIndex = 12
Top = 1995
Width = 2070
End
Begin VB.ComboBox logicCombo2
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 4890
TabIndex = 11
Top = 1485
Width = 2160
End
Begin VB.TextBox logicKeyWord2
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 4875
TabIndex = 10
Top = 1950
Width = 2160
End
Begin VB.CommandButton logicCZ
Caption = "查询"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 11670
TabIndex = 9
Top = 930
Width = 1275
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -