📄 frmtempheart.frm
字号:
VERSION 5.00
Begin VB.Form frmTempHeart
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 = 133
Top = 7020
Width = 1575
End
Begin VB.CommandButton cmdCover
Caption = "覆盖(F3)"
Height = 495
Left = 8040
TabIndex = 132
Top = 7020
Width = 1635
End
Begin VB.CommandButton cmdAdd
Caption = "添加(F2)"
Height = 495
Left = 6240
TabIndex = 131
Top = 7020
Width = 1635
End
Begin VB.PictureBox picOutside
CausesValidation= 0 'False
Height = 6900
Left = 0
ScaleHeight = 6840
ScaleMode = 0 'User
ScaleWidth = 15000
TabIndex = 135
TabStop = 0 'False
Top = 0
Width = 11790
Begin VB.VScrollBar vsbTemplet
CausesValidation= 0 'False
Height = 6840
LargeChange = 6000
Left = 11460
Max = 8000
SmallChange = 1500
TabIndex = 134
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 = 136
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 = 13965
Left = 360
TabIndex = 137
Top = 105
Width = 11400
Begin VB.ComboBox cboH_E_M
Height = 300
Left = 4170
TabIndex = 90
Tag = "二尖瓣M型显示"
Top = 8130
Width = 3675
End
Begin VB.TextBox txtH_S_CK
Height = 285
Left = 9060
TabIndex = 110
Top = 10035
Width = 495
End
Begin VB.TextBox txtH_E_SK
Height = 285
Left = 7320
TabIndex = 101
Top = 9225
Width = 495
End
Begin VB.TextBox txtH_F_CK
Height = 270
Left = 7320
TabIndex = 121
Top = 11565
Width = 495
End
Begin VB.TextBox txtH_Z_CK
Height = 270
Left = 7500
TabIndex = 82
Top = 7320
Width = 495
End
Begin VB.TextBox txtH_E_CK
Height = 270
Left = 10320
TabIndex = 98
Top = 8865
Width = 495
End
Begin VB.TextBox txtH_Z_SK
Height = 270
Left = 10200
TabIndex = 87
Top = 7695
Width = 495
End
Begin VB.TextBox txtH_S_SK
Height = 270
Left = 7320
TabIndex = 113
Top = 10395
Width = 495
End
Begin VB.TextBox txtH_F_SK
Height = 270
Left = 10200
TabIndex = 126
Top = 11925
Width = 495
End
Begin VB.ComboBox cboH_SJ
Height = 300
Left = 900
TabIndex = 102
Tag = "三尖瓣位置"
Top = 9660
Width = 735
End
Begin VB.ComboBox cboH_RJ
Height = 300
Left = 900
TabIndex = 88
Tag = "二尖瓣位置"
Top = 8130
Width = 735
End
Begin VB.TextBox txtH_E_A
Height = 270
Left = 4260
TabIndex = 16
Top = 2850
Width = 555
End
Begin VB.ComboBox cboH_EA
Height = 300
Left = 7080
TabIndex = 17
Tag = "二尖瓣EA峰比较"
Top = 2835
Width = 555
End
Begin VB.TextBox txtH_M_A
Height = 270
Left = 4260
TabIndex = 19
Top = 3180
Width = 555
End
Begin VB.TextBox txtH_L_A
Height = 270
Left = 1320
TabIndex = 18
Top = 3180
Width = 555
End
Begin VB.TextBox txtH_HR
Height = 270
Left = 8460
TabIndex = 14
Top = 2520
Width = 555
End
Begin VB.TextBox txtH_E_F
Height = 270
Left = 1320
TabIndex = 15
Top = 2850
Width = 555
End
Begin VB.TextBox txtH_LL
Height = 270
Left = 8460
TabIndex = 9
Top = 975
Width = 555
End
Begin VB.TextBox txtH_RL
Height = 270
Left = 3120
TabIndex = 6
Top = 2211
Width = 555
End
Begin VB.TextBox txtH_PAD_R
Height = 270
Left = 6000
TabIndex = 116
Top = 10845
Width = 495
End
Begin VB.TextBox txtH_PAD_L
Height = 270
Left = 3960
TabIndex = 115
Top = 10845
Width = 495
End
Begin VB.TextBox txtH_EF
Height = 270
Left = 8460
TabIndex = 10
Top = 1290
Width = 555
End
Begin VB.ComboBox cboH_S_R
Height = 300
Left = 3060
TabIndex = 59
Tag = "室间隔"
Top = 5340
Width = 1275
End
Begin VB.ComboBox cboH_S_H
Height = 300
Left = 840
TabIndex = 58
Tag = "房间隔"
Top = 5340
Width = 915
End
Begin VB.TextBox txtH_TS
Height = 270
Left = 8220
TabIndex = 106
Top = 9675
Width = 495
End
Begin VB.ComboBox cboH_TS
Height = 300
Left = 6480
TabIndex = 105
Tag = "三尖瓣位置"
Top = 9660
Width = 915
End
Begin VB.TextBox txtH_CO
Height = 270
Left = 8460
TabIndex = 13
Top = 2205
Width = 555
End
Begin VB.TextBox txtH_SV
Height = 270
Left = 8460
TabIndex = 12
Top = 1905
Width = 555
End
Begin VB.ComboBox cboH_MH
Height = 300
Left = 5580
TabIndex = 130
Tag = "图象质量"
Top = 13260
Width = 735
End
Begin VB.ComboBox cboH_STS
Height = 300
Left = 2880
TabIndex = 129
Tag = "透声条件"
Top = 13260
Width = 915
End
Begin VB.ComboBox cboH_SH
Height = 300
Left = 900
TabIndex = 128
Tag = "检查时心率"
Top = 12780
Width = 915
End
Begin VB.TextBox txtH_PAF
Height = 270
Left = 2160
TabIndex = 127
Top = 12270
Width = 735
End
Begin VB.TextBox txtH_PADC
Height = 270
Left = 8520
TabIndex = 125
Top = 11925
Width = 495
End
Begin VB.TextBox txtH_PADV
Height = 270
Left = 6840
TabIndex = 124
Top = 11925
Width = 495
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -