📄 frmtempbyskull.frm
字号:
VERSION 5.00
Begin VB.Form frmTempBySkull
BorderStyle = 3 'Fixed Dialog
Caption = "经颅模板"
ClientHeight = 7635
ClientLeft = 45
ClientTop = 330
ClientWidth = 11790
Icon = "frmTempBySkull.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 = 89
Top = 7020
Width = 1575
End
Begin VB.CommandButton cmdCover
Caption = "覆盖(F3)"
Height = 495
Left = 8040
TabIndex = 88
Top = 7020
Width = 1635
End
Begin VB.CommandButton cmdAdd
Caption = "添加(F2)"
Height = 495
Left = 6240
TabIndex = 87
Top = 7020
Width = 1635
End
Begin VB.PictureBox picOutside
CausesValidation= 0 'False
Height = 6900
Left = 0
ScaleHeight = 6840
ScaleWidth = 11730
TabIndex = 90
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 = 91
TabStop = 0 'False
Top = 0
Width = 12045
Begin VB.Frame fraBySkull
Caption = "经颅"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2955
Left = 420
TabIndex = 94
Top = 120
Width = 11355
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 5
Left = 7815
TabIndex = 47
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 2
Left = 3915
TabIndex = 44
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 0
Left = 1320
TabIndex = 42
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 1
Left = 2625
TabIndex = 43
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 3
Left = 5220
TabIndex = 45
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 4
Left = 6525
TabIndex = 46
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_Date3
Height = 270
Index = 6
Left = 9120
TabIndex = 48
Top = 2070
Width = 1020
End
Begin VB.TextBox txtNA_S3
Height = 270
Index = 1
Left = 9900
TabIndex = 76
Text = "txtNA_S3"
Top = 4395
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_S3
Height = 270
Index = 0
Left = 9900
TabIndex = 57
Text = "txtNA_S3"
Top = 2625
Visible = 0 'False
Width = 480
End
Begin VB.ComboBox cboNA_B
Height = 300
Index = 1
Left = 6840
TabIndex = 86
Tag = "收缩期峰速比"
Text = "cboNA_B"
Top = 5587
Visible = 0 'False
Width = 795
End
Begin VB.ComboBox cboNA_B
Height = 300
Index = 0
Left = 6840
TabIndex = 67
Tag = "收缩期峰速比"
Text = "cboNA_B"
Top = 3772
Visible = 0 'False
Width = 795
End
Begin VB.TextBox txtNA_SBPV
Height = 270
Index = 1
Left = 2280
TabIndex = 85
Text = "txtNA_SBPV"
Top = 5595
Visible = 0 'False
Width = 495
End
Begin VB.TextBox txtNA_ETV
Height = 270
Index = 1
Left = 9120
TabIndex = 84
Text = "txtNA_ETV"
Top = 5190
Visible = 0 'False
Width = 495
End
Begin VB.TextBox txtNA_PW
Height = 270
Index = 1
Left = 6840
TabIndex = 83
Text = "txtNA_PW"
Top = 5197
Visible = 0 'False
Width = 495
End
Begin VB.TextBox txtNA_BL
Height = 270
Index = 1
Left = 1740
TabIndex = 77
Text = "txtNA_BL"
Top = 4800
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_S2
Height = 270
Index = 1
Left = 9120
TabIndex = 75
Text = "txtNA_S2"
Top = 4395
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_S1
Height = 270
Index = 1
Left = 8340
TabIndex = 74
Text = "txtNA_S1"
Top = 4395
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_Num
Height = 270
Index = 1
Left = 4860
TabIndex = 71
Text = "txtNA_Num"
Top = 4395
Visible = 0 'False
Width = 375
End
Begin VB.TextBox txtNA_SBPV
Height = 270
Index = 0
Left = 2280
TabIndex = 66
Text = "txtNA_SBPV"
Top = 3780
Visible = 0 'False
Width = 495
End
Begin VB.TextBox txtNA_ETV
Height = 270
Index = 0
Left = 9120
TabIndex = 65
Text = "txtNA_ETV"
Top = 3390
Visible = 0 'False
Width = 495
End
Begin VB.TextBox txtNA_PW
Height = 270
Index = 0
Left = 6840
TabIndex = 64
Text = "txtNA_PW"
Top = 3390
Visible = 0 'False
Width = 495
End
Begin VB.TextBox txtNA_BL
Height = 270
Index = 0
Left = 1740
TabIndex = 58
Text = "txtNA_BL"
Top = 3015
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_S2
Height = 270
Index = 0
Left = 9120
TabIndex = 56
Text = "txtNA_S2"
Top = 2625
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_S1
Height = 270
Index = 0
Left = 8340
TabIndex = 55
Text = "txtNA_S1"
Top = 2625
Visible = 0 'False
Width = 480
End
Begin VB.TextBox txtNA_Num
Height = 270
Index = 0
Left = 4860
TabIndex = 52
Text = "txtNA_Num"
Top = 2625
Visible = 0 'False
Width = 375
End
Begin VB.TextBox txtNA_Date1
Height = 270
Index = 2
Left = 2625
TabIndex = 16
Top = 1380
Width = 480
End
Begin VB.TextBox txtNA_Date2
Height = 270
Index = 13
Left = 9660
TabIndex = 41
Top = 1725
Width = 480
End
Begin VB.TextBox txtNA_Date2
Height = 270
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -