📄 frmtempthyroidgland.frm
字号:
VERSION 5.00
Begin VB.Form frmTempThyroidGland
BorderStyle = 3 'Fixed Dialog
Caption = "甲状腺"
ClientHeight = 7635
ClientLeft = 45
ClientTop = 330
ClientWidth = 11790
Icon = "frmTempThyroidGland.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.CommandButton cmdCancel
Cancel = -1 'True
Caption = "取消(Esc)"
CausesValidation= 0 'False
Height = 495
Left = 9840
TabIndex = 33
Top = 7020
Width = 1575
End
Begin VB.CommandButton cmdCover
Caption = "覆盖(F3)"
Height = 495
Left = 8040
TabIndex = 32
Top = 7020
Width = 1635
End
Begin VB.CommandButton cmdAdd
Caption = "添加(F2)"
Height = 495
Left = 6240
TabIndex = 31
Top = 7020
Width = 1635
End
Begin VB.PictureBox picOutside
CausesValidation= 0 'False
Height = 6900
Left = 0
ScaleHeight = 6840
ScaleWidth = 11730
TabIndex = 34
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 = 35
TabStop = 0 'False
Top = 0
Width = 12045
Begin VB.Frame fraThyroidGland
Caption = "甲状腺"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 3315
Left = 360
TabIndex = 36
Top = 135
Width = 11355
Begin VB.ComboBox cboTG_L_B
Height = 300
Left = 9300
TabIndex = 28
Tag = "肿块内部血流分布"
Text = "cboTG_L_B"
Top = 2340
Width = 1095
End
Begin VB.ComboBox cboTG_R_B
Height = 300
Left = 9300
TabIndex = 18
Tag = "肿块内部血流分布"
Text = "cboTG_R_B"
Top = 1515
Width = 1095
End
Begin VB.TextBox txtTG_L_Z2
Height = 270
Left = 2760
TabIndex = 25
Text = "txtTG_L_Z2"
Top = 2355
Width = 495
End
Begin VB.TextBox txtTG_L_Z1
Height = 270
Left = 10320
TabIndex = 7
Text = "txtTG_L_Z1"
Top = 360
Width = 495
End
Begin VB.TextBox txtTG_R_Z2
Height = 270
Left = 2760
TabIndex = 15
Text = "txtTG_R_Z2"
Top = 1530
Width = 495
End
Begin VB.TextBox txtTG_R_Z1
Height = 270
Left = 4740
TabIndex = 3
Text = "txtTG_R_Z1"
Top = 360
Width = 495
End
Begin VB.TextBox txtTG_Thick
Height = 270
Left = 975
TabIndex = 8
Text = "txtTG_Thick"
Top = 720
Width = 495
End
Begin VB.ComboBox cboTG_See
Height = 300
Left = 2820
TabIndex = 30
Tag = "所见声像图"
Text = "cboTG_See"
Top = 2805
Width = 1815
End
Begin VB.ComboBox cboTG_Place
Height = 300
Left = 1020
TabIndex = 29
Tag = "部位"
Text = "cboTG_Place"
Top = 2805
Width = 1095
End
Begin VB.ComboBox cboTG_L_Tumour
Height = 300
Left = 8580
TabIndex = 22
Tag = "内见肿块"
Text = "cboTG_L_Tumour"
Top = 1980
Width = 1815
End
Begin VB.ComboBox cboTG_R_Tumour
Height = 300
Left = 8580
TabIndex = 12
Tag = "内见肿块"
Text = "cboTG_R_Tumour"
Top = 1155
Width = 1815
End
Begin VB.ComboBox cboTG_L_Envelope
Height = 300
Left = 6660
TabIndex = 27
Tag = "肿块包膜"
Text = "cboTG_L_Envelope"
Top = 2340
Width = 735
End
Begin VB.ComboBox cboTG_L_Echo
Height = 300
Left = 3495
TabIndex = 20
Tag = "内部回声"
Text = "cboTG_L_Echo"
Top = 1980
Width = 1290
End
Begin VB.ComboBox cboTG_L_Leaf
Height = 300
Left = 6495
TabIndex = 4
Tag = "状态"
Text = "cboTG_L_Leaf"
Top = 345
Width = 1590
End
Begin VB.ComboBox cboTG_L_Shape
Height = 300
Left = 1200
TabIndex = 19
Tag = "形态"
Text = "cboTG_L_Shape"
Top = 1980
Width = 1155
End
Begin VB.TextBox txtTG_L_Length1
Height = 270
Left = 8760
TabIndex = 5
Text = "txtTG_L_Length1"
Top = 360
Width = 495
End
Begin VB.TextBox txtTG_L_Width1
Height = 270
Left = 9525
TabIndex = 6
Text = "txtTG_L_Width1"
Top = 360
Width = 495
End
Begin VB.ComboBox cboTG_L_BloodStream
Height = 300
Left = 6120
TabIndex = 21
Tag = "血流分布"
Text = "cboTG_L_BloodStream"
Top = 1980
Width = 1395
End
Begin VB.TextBox txtTG_L_Length2
Height = 270
Left = 1200
TabIndex = 23
Text = "txtTG_L_Length2"
Top = 2355
Width = 495
End
Begin VB.TextBox txtTG_L_Width2
Height = 270
Left = 1995
TabIndex = 24
Text = "txtTG_L_Width2"
Top = 2355
Width = 495
End
Begin VB.ComboBox cboTG_L_Border
Height = 300
Left = 4620
TabIndex = 26
Tag = "肿块边界"
Text = "cboTG_L_Border"
Top = 2340
Width = 1395
End
Begin VB.ComboBox cboTG_R_Envelope
Height = 300
Left = 6660
TabIndex = 17
Tag = "肿块包膜"
Text = "cboTG_R_Envelope"
Top = 1515
Width = 735
End
Begin VB.ComboBox cboTG_R_Echo
Height = 300
Left = 3495
TabIndex = 10
Tag = "内部回声"
Text = "cboTG_R_Echo"
Top = 1155
Width = 1290
End
Begin VB.ComboBox cboTG_R_Leaf
Height = 300
Left = 975
TabIndex = 0
Tag = "状态"
Text = "cboTG_R_Leaf"
Top = 345
Width = 1590
End
Begin VB.ComboBox cboTG_R_Border
Height = 300
Left = 4620
TabIndex = 16
Tag = "肿块边界"
Text = "cboTG_R_Border"
Top = 1515
Width = 1395
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -