📄 frmquery_c.frm
字号:
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "其它"
Height = 255
Index = 5
Left = 540
TabIndex = 123
Top = 1515
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Index = 13
Left = 5310
TabIndex = 122
Top = 1260
Width = 885
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "肺心病"
Height = 255
Index = 9
Left = 4500
TabIndex = 121
Top = 1230
Width = 1035
End
Begin VB.Label Label77
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Left = 1620
TabIndex = 120
Top = 1230
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "恶性肿瘤"
Height = 255
Index = 4
Left = 540
TabIndex = 119
Top = 1230
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Index = 12
Left = 5310
TabIndex = 118
Top = 900
Width = 885
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "精神病"
Height = 255
Index = 8
Left = 4500
TabIndex = 117
Top = 885
Width = 1035
End
Begin VB.Label Label73
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Left = 1620
TabIndex = 116
Top = 900
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "高血脂"
Height = 255
Index = 2
Left = 540
TabIndex = 115
Top = 885
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Index = 11
Left = 5310
TabIndex = 114
Top = 585
Width = 885
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "糖尿病"
Height = 255
Index = 7
Left = 4500
TabIndex = 113
Top = 570
Width = 1035
End
Begin VB.Label Label69
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Left = 1620
TabIndex = 112
Top = 585
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Index = 10
Left = 5310
TabIndex = 111
Top = 255
Width = 885
End
Begin VB.Label Label67
BackStyle = 0 'Transparent
Caption = "确诊时间"
Height = 255
Left = 1620
TabIndex = 110
Top = 255
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "冠心病"
Height = 255
Index = 3
Left = 540
TabIndex = 109
Top = 570
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "脑卒中"
Height = 255
Index = 6
Left = 4500
TabIndex = 108
Top = 255
Width = 1035
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "高血压病"
Height = 255
Index = 1
Left = 540
TabIndex = 107
Top = 255
Width = 1035
End
End
End
Begin VB.Frame fraGRen
BackColor = &H00D3DABC&
Caption = "个人信息"
Height = 6945
Left = 240
TabIndex = 9
Top = 450
Width = 9135
Begin VB.TextBox txtQTXG
Height = 315
Left = 6930
Locked = -1 'True
TabIndex = 80
Top = 5165
Width = 1845
End
Begin VB.ComboBox cmbSMKN
Height = 315
ItemData = "frmQuery_C.frx":19EC
Left = 6930
List = "frmQuery_C.frx":19FF
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 79
Top = 4718
Width = 1845
End
Begin VB.TextBox txtSMSJ
Height = 285
Left = 6930
Locked = -1 'True
TabIndex = 78
Top = 4301
Width = 885
End
Begin VB.ComboBox cmbYSXG
Height = 315
ItemData = "frmQuery_C.frx":1A21
Left = 6930
List = "frmQuery_C.frx":1A3D
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 77
Top = 3854
Width = 1845
End
Begin VB.ComboBox cmbDLSJ
Height = 315
ItemData = "frmQuery_C.frx":1A73
Left = 6930
List = "frmQuery_C.frx":1A83
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 76
Top = 3407
Width = 1845
End
Begin VB.ComboBox cmbDLLX
Height = 315
ItemData = "frmQuery_C.frx":1AA5
Left = 6930
List = "frmQuery_C.frx":1AB2
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 75
Top = 2960
Width = 1845
End
Begin VB.ComboBox cmbTYDLQK
Height = 315
ItemData = "frmQuery_C.frx":1AFE
Left = 6930
List = "frmQuery_C.frx":1B11
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 74
Top = 2513
Width = 1845
End
Begin VB.ComboBox cmbYWGMS
Height = 315
ItemData = "frmQuery_C.frx":1B3E
Left = 6930
List = "frmQuery_C.frx":1B54
Style = 2 'Dropdown List
TabIndex = 73
Top = 2066
Width = 1845
End
Begin VB.ComboBox cmbZhiYi
Height = 315
ItemData = "frmQuery_C.frx":1B7A
Left = 6930
List = "frmQuery_C.frx":1BAB
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 72
Top = 5615
Width = 1845
End
Begin VB.TextBox txtGZDW
Height = 285
Left = 6930
Locked = -1 'True
TabIndex = 71
Top = 1649
Width = 1845
End
Begin VB.ComboBox cmbMINZU
Height = 315
Left = 6930
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 70
Top = 1202
Width = 1845
End
Begin VB.TextBox txtNation
Height = 285
Left = 6930
Locked = -1 'True
TabIndex = 69
Top = 785
Width = 1845
End
Begin XPControls.XPCommandButton cmdShowVideo
Height = 315
Left = 3090
TabIndex = 68
Top = 1200
Width = 2145
_ExtentX = 3784
_ExtentY = 556
Caption = "显示影像信息"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.TextBox TxtGSelfBH
Height = 300
Left = 1770
Locked = -1 'True
TabIndex = 23
Top = 796
Width = 1845
End
Begin VB.TextBox txtGEMail
Height = 285
Left = 1770
Locked = -1 'True
TabIndex = 22
Top = 5201
Width = 1845
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -