📄 frmreportedit.frm
字号:
Height = 285
Left = 990
TabIndex = 40
Top = 270
Width = 840
End
Begin VB.Frame frmDiagnoseResultState
Appearance = 0 'Flat
BackColor = &H00F1E7DA&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 495
Left = 120
TabIndex = 39
Top = 135
Width = 2055
End
End
Begin VB.TextBox txtPhotoDescription
BackColor = &H00FFFFFF&
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 4035
IMEMode = 1 'ON
Left = 135
Locked = -1 'True
MaxLength = 260
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 34
Top = 585
Width = 10095
End
Begin VB.TextBox txtDiagnoseResult
BackColor = &H00FFFFFF&
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 3465
IMEMode = 1 'ON
Left = 135
Locked = -1 'True
MaxLength = 150
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 33
Top = 5175
Width = 10095
End
Begin VB.Label lblModalDes
BackColor = &H00E0E0E0&
BackStyle = 0 'Transparent
Caption = "影象描述"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 135
TabIndex = 36
Top = 315
Width = 975
End
Begin VB.Label lblModalImp
Alignment = 2 'Center
BackColor = &H00E0E0E0&
BackStyle = 0 'Transparent
Caption = "诊断结果"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 45
TabIndex = 35
Top = 4875
Width = 1110
End
End
End
Begin VB.Frame frmPatientInfo
BackColor = &H00E0E0E0&
Caption = "患者信息"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 1485
Left = 0
TabIndex = 0
Top = 0
Width = 15285
Begin VB.TextBox txtExamClass
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
IMEMode = 1 'ON
Left = 2565
MaxLength = 50
TabIndex = 59
Top = 1170
Visible = 0 'False
Width = 1125
End
Begin VB.TextBox txtApplyDept
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 1035
Locked = -1 'True
TabIndex = 56
Top = 675
Width = 2040
End
Begin VB.ComboBox cmbApplyDepartment
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 1035
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 55
Top = 675
Width = 2295
End
Begin VB.TextBox txtApplyDoctor
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 4455
Locked = -1 'True
TabIndex = 54
Top = 690
Width = 1785
End
Begin VB.TextBox txtCharge
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 10575
Locked = -1 'True
TabIndex = 53
Top = 1065
Width = 1680
End
Begin VB.TextBox txtAllCheckParts
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 1035
Locked = -1 'True
MaxLength = 60
TabIndex = 52
Top = 1080
Width = 8370
End
Begin VB.TextBox txtState
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 7560
Locked = -1 'True
TabIndex = 51
Top = 690
Width = 1605
End
Begin VB.TextBox txtAgeWeigh
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 13770
Locked = -1 'True
TabIndex = 50
Top = 315
Width = 345
End
Begin VB.TextBox txtSex
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 10575
Locked = -1 'True
TabIndex = 49
Top = 315
Width = 1455
End
Begin VB.ComboBox cmbState
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
ItemData = "frmReportEdit.frx":6852
Left = 7560
List = "frmReportEdit.frx":685C
Locked = -1 'True
Style = 2 'Dropdown List
TabIndex = 30
Top = 690
Width = 1845
End
Begin VB.TextBox txtHospitalNumber
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
IMEMode = 2 'OFF
Left = 10575
Locked = -1 'True
MaxLength = 20
TabIndex = 27
Top = 705
Width = 1695
End
Begin VB.TextBox txtPatientName_PHONETIC
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
IMEMode = 2 'OFF
Left = 7560
Locked = -1 'True
MaxLength = 50
TabIndex = 25
Top = 315
Width = 1845
End
Begin GetData.XPB btnModifyPart
Height = 450
Left = 13695
TabIndex = 13
Top = 1830
Visible = 0 'False
Width = 1095
_ExtentX = 1931
_ExtentY = 794
Caption = "保存"
FontColor = -2147483630
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.TextBox txtFee
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Left = 17985
MaxLength = 19
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -