frmsick_tnb_main.frm
来自「医院糖尿病管理系统．是客户机服务器架构的」· FRM 代码 · 共 1,610 行 · 第 1/5 页
FRM
1,610 行
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 3
Left = 585
TabIndex = 59
Top = 540
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "身份证号"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 12
Left = 5460
TabIndex = 58
Top = 540
Width = 960
End
Begin VB.Label LabelField
AutoSize = -1 'True
Caption = "性 别"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 1
Left = 5460
TabIndex = 57
Top = 945
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "合同医院3"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 7
Left = 465
TabIndex = 56
Top = 4545
Width = 1080
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "合同医院4"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 6
Left = 5340
TabIndex = 55
Top = 4545
Width = 1080
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "保 险 号"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 5
Left = 5460
TabIndex = 54
Top = 3750
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "合同医院1"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 4
Left = 465
TabIndex = 53
Top = 4140
Width = 1080
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "来京日期"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 3
Left = 5460
TabIndex = 52
Top = 4950
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "合同医院2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 2
Left = 5340
TabIndex = 51
Top = 4155
Width = 1080
End
Begin VB.Label LabelField
AutoSize = -1 'True
Caption = "家庭住址"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 10
Left = 585
TabIndex = 50
Top = 2940
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "单位电话"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 10
Left = 5460
TabIndex = 49
Top = 2550
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "工作单位"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 9
Left = 585
TabIndex = 48
Top = 2535
Width = 960
End
Begin VB.Label LabelField
AutoSize = -1 'True
Caption = "出 生 地"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 7
Left = 585
TabIndex = 47
Top = 4950
Width = 960
End
Begin VB.Label LabelField
AutoSize = -1 'True
Caption = "文化程度"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 4
Left = 5460
TabIndex = 46
Top = 1740
Width = 960
End
Begin VB.Label LabelField
AutoSize = -1 'True
Caption = "婚姻状况"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 3
Left = 585
TabIndex = 45
Top = 2130
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "出生日期"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 1
Left = 585
TabIndex = 44
Top = 1335
Width = 960
End
Begin VB.Label LabelField
AutoSize = -1 'True
Caption = "户 口"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 6
Left = 5460
TabIndex = 43
Top = 3345
Width = 960
End
Begin VB.Label Label6
AutoSize = -1 'True
Caption = "住宅电话"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline ⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?