📄 frmtempk_a.frm
字号:
VERSION 5.00
Begin VB.Form frmTempK_A
BorderStyle = 3 'Fixed Dialog
Caption = "双肾双肾上腺"
ClientHeight = 7635
ClientLeft = 45
ClientTop = 330
ClientWidth = 11790
Icon = "frmTempK_A.frx":0000
KeyPreview = -1 'True
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 7635
ScaleWidth = 11790
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin VB.VScrollBar vsbTemplet
CausesValidation= 0 'False
Height = 6840
LargeChange = 1500
Left = 11510
Max = 1500
SmallChange = 1500
TabIndex = 186
TabStop = 0 'False
Top = 30
Width = 255
End
Begin VB.CommandButton cmdAdd
Caption = "添加(F2)"
Height = 495
Left = 6240
TabIndex = 81
Top = 7020
Width = 1635
End
Begin VB.CommandButton cmdCover
Caption = "覆盖(F3)"
Height = 495
Left = 8040
TabIndex = 82
Top = 7020
Width = 1635
End
Begin VB.CommandButton cmdCancel
Cancel = -1 'True
Caption = "取消(Esc)"
CausesValidation= 0 'False
Height = 495
Left = 9840
TabIndex = 83
Top = 7020
Width = 1575
End
Begin VB.PictureBox picOutside
CausesValidation= 0 'False
Height = 6900
Left = 0
ScaleHeight = 6840
ScaleWidth = 11730
TabIndex = 84
TabStop = 0 'False
Top = 0
Width = 11790
Begin VB.PictureBox picInside
Appearance = 0 'Flat
BorderStyle = 0 'None
CausesValidation= 0 'False
ForeColor = &H80000008&
Height = 12000
Left = -300
ScaleHeight = 12000
ScaleWidth = 12045
TabIndex = 85
TabStop = 0 'False
Top = 0
Width = 12045
Begin VB.Frame fraAdrens
Caption = "双肾上腺"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2070
Left = 420
TabIndex = 111
Top = 5220
Width = 11355
Begin VB.ComboBox cboA_Boundary
Height = 300
Left = 9000
TabIndex = 78
Tag = "肿块边界"
Text = "cboA_Boundary"
Top = 1215
Width = 1275
End
Begin VB.ComboBox cboA_B
Height = 300
Left = 3480
TabIndex = 80
Tag = "肿块内部血流分布"
Text = "cboA_B"
Top = 1575
Width = 1815
End
Begin VB.ComboBox cboA_Envelope
Height = 300
Left = 885
TabIndex = 79
Tag = "肿块包膜"
Text = "cboA_Envelope"
Top = 1575
Width = 735
End
Begin VB.TextBox txtA_Z2
Height = 270
Left = 6960
TabIndex = 77
Text = "txtA_Z2"
Top = 1230
Width = 495
End
Begin VB.TextBox txtA_Z1
Height = 270
Index = 1
Left = 10080
TabIndex = 71
Text = "txtA_Z1"
Top = 780
Width = 495
End
Begin VB.TextBox txtA_Z1
Height = 270
Index = 0
Left = 10080
TabIndex = 65
Text = "txtA_Z1"
Top = 405
Width = 495
End
Begin VB.ComboBox cboA_Echo
Height = 300
Index = 1
Left = 2565
TabIndex = 67
Tag = "内部回声"
Text = "cboA_Echo"
Top = 780
Width = 1455
End
Begin VB.ComboBox cboA_Echo
Height = 300
Index = 0
Left = 2565
TabIndex = 61
Tag = "内部回声"
Text = "cboA_Echo"
Top = 360
Width = 1455
End
Begin VB.ComboBox cboA_Bigger
Height = 300
Left = 4560
TabIndex = 74
Tag = "大小"
Text = "cboA_Bigger"
Top = 1215
Width = 735
End
Begin VB.ComboBox cboA_Part1
Height = 300
Index = 1
Left = 180
TabIndex = 66
Tag = "部位"
Text = "cboA_Part"
Top = 780
Width = 735
End
Begin VB.ComboBox cboA_Probe
Height = 300
Index = 1
Left = 5400
TabIndex = 68
Tag = "探测"
Text = "cboA_Probe"
Top = 780
Width = 2160
End
Begin VB.TextBox txtA_Width1
Height = 270
Index = 1
Left = 9300
TabIndex = 70
Text = "txtA_Width1"
Top = 795
Width = 495
End
Begin VB.TextBox txtA_Length1
Height = 270
Index = 1
Left = 8520
TabIndex = 69
Text = "txtA_Length1"
Top = 795
Width = 495
End
Begin VB.ComboBox cboA_Part1
Height = 300
Index = 0
Left = 180
TabIndex = 60
Tag = "部位"
Text = "cboA_Part"
Top = 360
Width = 735
End
Begin VB.TextBox txtA_Length1
Height = 270
Index = 0
Left = 8520
TabIndex = 63
Text = "txtA_Length1"
Top = 405
Width = 495
End
Begin VB.TextBox txtA_Width1
Height = 270
Index = 0
Left = 9300
TabIndex = 64
Text = "txtA_Width1"
Top = 405
Width = 495
End
Begin VB.ComboBox cboA_Probe
Height = 300
Index = 0
Left = 5385
TabIndex = 62
Tag = "探测"
Text = "cboA_Probe"
Top = 360
Width = 2160
End
Begin VB.ComboBox cboA_See
Height = 300
Left = 1845
TabIndex = 73
Tag = "肾上腺声像图"
Text = "cboA_See"
Top = 1215
Width = 2175
End
Begin VB.TextBox txtA_Length2
Height = 270
Left = 5400
TabIndex = 75
Text = "txtA_Length2"
Top = 1230
Width = 495
End
Begin VB.TextBox txtA_Width2
Height = 270
Left = 6180
TabIndex = 76
Text = "txtA_Width2"
Top = 1230
Width = 495
End
Begin VB.ComboBox cboA_Part2
Height = 300
Left = 180
TabIndex = 72
Tag = "部位"
Text = "cboA_Part2"
Top = 1215
Width = 735
End
Begin VB.Label Label38
Caption = "肿块边界"
Height = 195
Left = 8055
TabIndex = 142
Top = 1275
Width = 855
End
Begin VB.Label Label37
Caption = "。"
Height = 195
Left = 5325
TabIndex = 141
Top = 1635
Width = 195
End
Begin VB.Label Label36
Caption = "内部血流分布"
Height = 195
Left = 2385
TabIndex = 140
Top = 1635
Width = 1095
End
Begin VB.Label Label34
Caption = "包膜,"
Height = 195
Left = 1665
TabIndex = 139
Top = 1635
Width = 480
End
Begin VB.Label Label33
Caption = ","
Height = 255
Left = 10350
TabIndex = 138
Top = 1245
Width = 135
End
Begin VB.Label Label16
Caption = "×"
Height = 135
Left = 6720
TabIndex = 133
Top = 1305
Width = 195
End
Begin VB.Label Label15
Caption = "×"
Height = 195
Left = 9840
TabIndex = 132
Top = 840
Width = 195
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -