📄 frmtempheartdescribe.frm
字号:
VERSION 5.00
Begin VB.Form frmTempHeartDescribe
BorderStyle = 3 'Fixed Dialog
Caption = "心脏"
ClientHeight = 7620
ClientLeft = 45
ClientTop = 330
ClientWidth = 11790
KeyPreview = -1 'True
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 7620
ScaleWidth = 11790
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin VB.CommandButton cmdCancel
Cancel = -1 'True
Caption = "取消(Esc)"
CausesValidation= 0 'False
Height = 495
Left = 9840
TabIndex = 125
Top = 7020
Width = 1575
End
Begin VB.CommandButton cmdCover
Caption = "覆盖(F3)"
Height = 495
Left = 8040
TabIndex = 124
Top = 7020
Width = 1635
End
Begin VB.CommandButton cmdAdd
Caption = "添加(F2)"
Height = 495
Left = 6240
TabIndex = 123
Top = 7020
Width = 1635
End
Begin VB.PictureBox picOutside
CausesValidation= 0 'False
Height = 6900
Left = 0
ScaleHeight = 6840
ScaleMode = 0 'User
ScaleWidth = 15000
TabIndex = 127
TabStop = 0 'False
Top = 0
Width = 11790
Begin VB.VScrollBar vsbTemplet
CausesValidation= 0 'False
Height = 6840
LargeChange = 7500
Left = 11475
Max = 8000
SmallChange = 1500
TabIndex = 126
TabStop = 0 'False
Top = 0
Width = 255
End
Begin VB.PictureBox picInside
Appearance = 0 'Flat
BorderStyle = 0 'None
CausesValidation= 0 'False
ForeColor = &H80000008&
Height = 22000
Left = -300
ScaleHeight = 23472
ScaleMode = 0 'User
ScaleWidth = 12045
TabIndex = 128
TabStop = 0 'False
Top = 0
Width = 12043
Begin VB.Frame fraHeart
Caption = "心脏"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 14490
Left = 360
TabIndex = 129
Top = 135
Width = 11400
Begin VB.TextBox txtH_LAO
Height = 270
Left = 4950
TabIndex = 2
Text = "txtH_LAO"
Top = 675
Width = 465
End
Begin VB.TextBox txtH_RH
Height = 270
Index = 4
Left = 2340
TabIndex = 9
Text = "txtH_RH"
Top = 2115
Width = 465
End
Begin VB.TextBox txtH_RH
Height = 270
Index = 5
Left = 3825
TabIndex = 10
Text = "txtH_RH"
Top = 2115
Width = 465
End
Begin VB.TextBox txtH_LSDS
Height = 270
Left = 4950
TabIndex = 6
Text = "txtH_LSDS"
Top = 1395
Width = 465
End
Begin VB.TextBox txtH_LSDD
Height = 270
Left = 2340
TabIndex = 5
Text = "txtH_LSDD"
Top = 1395
Width = 465
End
Begin VB.TextBox txtH_LRDD
Height = 270
Left = 4950
TabIndex = 4
Text = "txtH_LRDD"
Top = 1035
Width = 465
End
Begin VB.TextBox txtH_LRDS
Height = 270
Left = 2340
TabIndex = 3
Text = "txtH_LRDS"
Top = 1035
Width = 465
End
Begin VB.TextBox txtH_LAI
Height = 270
Left = 3330
TabIndex = 1
Text = "txtH_LAI"
Top = 675
Width = 465
End
Begin VB.TextBox txtH_LAE
Height = 270
Left = 1440
TabIndex = 0
Text = "txtH_LAE"
Top = 675
Width = 465
End
Begin VB.ComboBox cboH_Shap
Height = 300
Left = 3420
TabIndex = 12
Tag = "心脏形态"
Text = "cboH_Shap"
Top = 2520
Width = 915
End
Begin VB.TextBox txtH_RH
Height = 270
Index = 0
Left = 2340
TabIndex = 7
Text = "txtH_RH"
Top = 1755
Width = 465
End
Begin VB.TextBox txtH_RH
Height = 270
Index = 3
Left = 3825
TabIndex = 8
Text = "txtH_RH"
Top = 1755
Width = 465
End
Begin VB.ComboBox cboH_RA
Height = 300
Left = 6120
TabIndex = 19
Tag = "心室连接"
Text = "cboH_RA"
Top = 3285
Width = 915
End
Begin VB.ComboBox cboH_LA
Height = 300
Left = 3780
TabIndex = 18
Tag = "心室连接"
Text = "cboH_LA"
Top = 3285
Width = 915
End
Begin VB.ComboBox cboH_PA
Height = 300
Left = 6120
TabIndex = 17
Tag = "心室连接"
Text = "cboH_PA"
Top = 2925
Width = 915
End
Begin VB.ComboBox cboH_AA
Height = 300
Left = 3780
TabIndex = 16
Tag = "心室连接"
Text = "cboH_AA"
Top = 2925
Width = 915
End
Begin VB.ComboBox cboH_BPlase
Height = 300
Left = 9405
TabIndex = 15
Tag = "大血管位置"
Text = "cboH_BPlase"
Top = 2520
Width = 915
End
Begin VB.ComboBox cboH_VPlase
Height = 300
Left = 7290
TabIndex = 14
Tag = "心室位置"
Text = "cboH_VPlase"
Top = 2520
Width = 915
End
Begin VB.ComboBox cboH_APlase
Height = 300
Left = 5355
TabIndex = 13
Tag = "心房位置"
Text = "cboH_APlase"
Top = 2520
Width = 915
End
Begin VB.ComboBox cboH_HPlase
Height = 300
Left = 1125
TabIndex = 11
Tag = "心脏位置"
Text = "cboH_HPlase"
Top = 2520
Width = 1275
End
Begin VB.TextBox txtH_AB3
Height = 270
Left = 4905
TabIndex = 119
Text = "txtH_AB3"
Top = 13140
Width = 465
End
Begin VB.TextBox txtH_AB2
Height = 270
Left = 4140
TabIndex = 118
Text = "txtH_AB2"
Top = 13140
Width = 465
End
Begin VB.TextBox txtH_AB1
Height = 270
Left = 3375
TabIndex = 117
Text = "txtH_AB1"
Top = 13140
Width = 465
End
Begin VB.TextBox txtH_ADD
Height = 270
Index = 1
Left = 8865
TabIndex = 112
Text = "txtH_ADD"
Top = 12465
Width = 465
End
Begin VB.TextBox txtH_ADD
Height = 270
Index = 2
Left = 4140
TabIndex = 115
Text = "txtH_ADD"
Top = 12780
Width = 465
End
Begin VB.TextBox txtH_ADD
Height = 270
Index = 0
Left = 4140
TabIndex = 109
Text = "txtH_ADD"
Top = 12420
Width = 465
End
Begin VB.ComboBox cboH_AP1
Height = 300
Left = 900
TabIndex = 116
Tag = "心包位置"
Text = "cboH_AP1"
Top = 13125
Width = 915
End
Begin VB.ComboBox cboH_AP
Height = 300
Index = 0
Left = 900
TabIndex = 107
Tag = "心包位置"
Text = "cboH_AP"
Top = 12405
Width = 915
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -