infoma.frm
来自「功能强大的个人工作通讯录」· FRM 代码 · 共 2,184 行 · 第 1/5 页
FRM
2,184 行
Height = 750
Left = 10200
TabIndex = 0
Top = 795
Visible = 0 'False
Width = 3255
End
Begin MSComctlLib.ListView lv
Height = 3240
Left = 480
TabIndex = 9
Top = 6375
Width = 9600
_ExtentX = 16933
_ExtentY = 5715
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 = 16711680
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 MSForms.TextBox txtXM
Height = 480
Left = 4620
TabIndex = 70
ToolTipText = "选定文本后按Ctrl+C复制文本"
Top = 330
Width = 2025
VariousPropertyBits= 746604563
ForeColor = 255
Size = "3572;847"
Value = "测试"
SpecialEffect = 0
FontName = "华文行楷"
FontHeight = 435
FontCharSet = 134
FontPitchAndFamily= 34
End
Begin VB.Label Label11
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "姓名："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 69
Top = 420
Width = 945
End
Begin VB.Shape Shape2
BorderColor = &H80000003&
FillColor = &H00FFFFFF&
Height = 5700
Left = 210
Top = 150
Width = 13800
End
Begin MSForms.TextBox txtEmail
Height = 390
Left = 10200
TabIndex = 43
ToolTipText = "选定文本后按Ctrl+C复制文本"
Top = 2745
Width = 3255
VariousPropertyBits= 746604563
ForeColor = 12582912
Size = "5741;688"
Value = "测试"
SpecialEffect = 0
FontName = "楷体_GB2312"
FontEffects = 1073741825
FontHeight = 315
FontCharSet = 134
FontPitchAndFamily= 34
FontWeight = 700
End
Begin VB.Label Label14
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "E-mail："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 9000
TabIndex = 42
Top = 2760
Width = 1305
End
Begin VB.Label Label8
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "来往记录"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 285
Left = 11400
TabIndex = 38
Top = 6285
Width = 1200
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "相片标准尺寸（大一寸）"
ForeColor = &H00FF00FF&
Height = 270
Left = 390
TabIndex = 37
Top = 4530
Width = 2070
End
Begin VB.Label LabCD
BackStyle = 0 'Transparent
Caption = "存档日期："
Height = 540
Left = 345
TabIndex = 36
Top = 5280
Width = 2475
End
Begin VB.Label Label23
BackStyle = 0 'Transparent
Caption = "条件"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 285
Left = 10620
TabIndex = 35
Top = 6900
Width = 630
End
Begin VB.Label Label24
BackStyle = 0 'Transparent
Caption = "关键字"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 285
Left = 10575
TabIndex = 34
Top = 7515
Width = 945
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "省市："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 9300
TabIndex = 33
Top = 1560
Width = 945
End
Begin VB.Label Label6
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "公司："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 32
Top = 2145
Width = 945
End
Begin VB.Label Label10
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "生日："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 31
Top = 990
Width = 945
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "性别："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 9300
TabIndex = 30
Top = 420
Width = 945
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "性格爱好"
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 615
Left = 3870
TabIndex = 29
Top = 4545
Width = 675
End
Begin VB.Label Label4
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "传真："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 28
Top = 2760
Width = 945
End
Begin VB.Label Label3
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "电话："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 27
Top = 3375
Width = 945
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "地址："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 26
Top = 3990
Width = 945
End
Begin VB.Label Label15
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "职务："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 9300
TabIndex = 25
Top = 2145
Width = 945
End
Begin VB.Label Label16
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "籍贯："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 9315
TabIndex = 24
Top = 990
Width = 945
End
Begin VB.Label Label25
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "分类："
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 3870
TabIndex = 23
Top = 1560
Width = 945
End
Begin MSForms.TextBox txtXB
Height = 390
Left = 10200
TabIndex = 22
ToolTipText = "选定文本后按Ctrl+C复制文本"
Top = 390
Width = 3255
VariousPropertyBits= 746604563
ForeColor = 12582912
Size = "5741;688"
Value = "测试"
SpecialEffect = 0
FontName = "楷体_GB2312"
FontEffects = 1073741825
FontHeight = 315
FontCharSet = 134
FontPitchAndFamily= 34
FontWeight = 700
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?