frmtempheart.frm

VB6.0编写的医院影像系统

            Begin VB.TextBox txtH_AD 
               Height          =   270
               Index           =   0
               Left            =   1860
               TabIndex        =   65
               Top             =   6135
               Width           =   555
            End
            Begin VB.ComboBox cboH_AP 
               Height          =   300
               Index           =   0
               Left            =   240
               TabIndex        =   64
               Tag             =   "心包位置"
               Top             =   6120
               Width           =   1155
            End
            Begin VB.TextBox txtH_S_CW 
               Height          =   270
               Left            =   3480
               TabIndex        =   63
               Top             =   5700
               Width           =   555
            End
            Begin VB.ComboBox cboH_S_PW 
               Height          =   300
               Left            =   960
               TabIndex        =   62
               Tag             =   "房室间隔PW"
               Top             =   5700
               Width           =   915
            End
            Begin VB.ComboBox cboH_S_CDFI 
               Height          =   300
               Left            =   8160
               TabIndex        =   61
               Tag             =   "房室间隔CDFI"
               Top             =   5340
               Width           =   1815
            End
            Begin VB.ComboBox cboH_S_S 
               Height          =   300
               Left            =   6600
               TabIndex        =   60
               Tag             =   "房室间隔回声"
               Top             =   5340
               Width           =   915
            End
            Begin VB.TextBox txtH_G2 
               Height          =   270
               Index           =   4
               Left            =   10320
               TabIndex        =   57
               Top             =   4935
               Width           =   480
            End
            Begin VB.TextBox txtH_G1 
               Height          =   270
               Index           =   4
               Left            =   9600
               TabIndex        =   56
               Top             =   4935
               Width           =   480
            End
            Begin VB.TextBox txtH_G2 
               Height          =   270
               Index           =   3
               Left            =   10320
               TabIndex        =   49
               Top             =   4605
               Width           =   480
            End
            Begin VB.TextBox txtH_G1 
               Height          =   270
               Index           =   3
               Left            =   9600
               TabIndex        =   48
               Top             =   4605
               Width           =   480
            End
            Begin VB.TextBox txtH_G2 
               Height          =   270
               Index           =   2
               Left            =   4860
               TabIndex        =   53
               Top             =   4935
               Width           =   480
            End
            Begin VB.TextBox txtH_G1 
               Height          =   270
               Index           =   2
               Left            =   4140
               TabIndex        =   52
               Top             =   4935
               Width           =   480
            End
            Begin VB.TextBox txtH_G2 
               Height          =   270
               Index           =   1
               Left            =   4860
               TabIndex        =   45
               Top             =   4605
               Width           =   480
            End
            Begin VB.TextBox txtH_G1 
               Height          =   270
               Index           =   1
               Left            =   4140
               TabIndex        =   44
               Top             =   4605
               Width           =   480
            End
            Begin VB.ComboBox cboH_M 
               Height          =   300
               Index           =   4
               Left            =   7980
               TabIndex        =   55
               Tag             =   "异常状态"
               Top             =   4920
               Width           =   1095
            End
            Begin VB.ComboBox cboH_M 
               Height          =   300
               Index           =   3
               Left            =   7980
               TabIndex        =   47
               Tag             =   "异常状态"
               Top             =   4590
               Width           =   1095
            End
            Begin VB.ComboBox cboH_M 
               Height          =   300
               Index           =   2
               Left            =   2520
               TabIndex        =   51
               Tag             =   "异常状态"
               Top             =   4920
               Width           =   1095
            End
            Begin VB.ComboBox cboH_M 
               Height          =   300
               Index           =   1
               Left            =   2520
               TabIndex        =   43
               Tag             =   "异常状态"
               Top             =   4590
               Width           =   1095
            End
            Begin VB.ComboBox cboH_L_Space 
               Height          =   300
               Index           =   4
               Left            =   5700
               TabIndex        =   54
               Tag             =   "异常位置"
               Top             =   4920
               Width           =   915
            End
            Begin VB.ComboBox cboH_L_Space 
               Height          =   300
               Index           =   3
               Left            =   5700
               TabIndex        =   46
               Tag             =   "异常位置"
               Top             =   4590
               Width           =   915
            End
            Begin VB.ComboBox cboH_L_Space 
               Height          =   300
               Index           =   2
               Left            =   240
               TabIndex        =   50
               Tag             =   "异常位置"
               Top             =   4920
               Width           =   915
            End
            Begin VB.ComboBox cboH_L_Space 
               Height          =   300
               Index           =   1
               Left            =   240
               TabIndex        =   42
               Tag             =   "异常位置"
               Top             =   4590
               Width           =   915
            End
            Begin VB.TextBox txtH_G2 
               Height          =   270
               Index           =   0
               Left            =   10320
               TabIndex        =   41
               Top             =   4275
               Width           =   480
            End
            Begin VB.TextBox txtH_G1 
               Height          =   270
               Index           =   0
               Left            =   9600
               TabIndex        =   40
               Top             =   4275
               Width           =   480
            End
            Begin VB.ComboBox cboH_M 
               Height          =   300
               Index           =   0
               Left            =   7980
               TabIndex        =   39
               Tag             =   "异常状态"
               Top             =   4260
               Width           =   1095
            End
            Begin VB.ComboBox cboH_L_Space 
               Height          =   300
               Index           =   0
               Left            =   5700
               TabIndex        =   38
               Tag             =   "异常位置"
               Top             =   4260
               Width           =   915
            End
            Begin VB.ComboBox cboH_ME 
               Height          =   300
               Left            =   3960
               TabIndex        =   37
               Tag             =   "间隔活动幅度"
               Top             =   4260
               Width           =   1215
            End
            Begin VB.ComboBox cboH_LI 
               Height          =   300
               Left            =   1740
               TabIndex        =   36
               Tag             =   "间隔运动"
               Top             =   4260
               Width           =   1215
            End
            Begin VB.TextBox txtH_A2 
               Height          =   270
               Index           =   3
               Left            =   7860
               TabIndex        =   34
               Top             =   3915
               Width           =   555
            End
            Begin VB.TextBox txtH_A1 
               Height          =   270
               Index           =   3
               Left            =   7080
               TabIndex        =   33
               Top             =   3915
               Width           =   555
            End
            Begin VB.TextBox txtH_A2 
               Height          =   270
               Index           =   2
               Left            =   2400
               TabIndex        =   30
               Top             =   3915
               Width           =   555
            End
            Begin VB.TextBox txtH_A1 
               Height          =   270
               Index           =   2
               Left            =   1620
               TabIndex        =   29
               Top             =   3915
               Width           =   555
            End
            Begin VB.TextBox txtH_A2 
               Height          =   270
               Index           =   0
               Left            =   2400
               TabIndex        =   22
               Top             =   3585
               Width           =   555
            End
            Begin VB.TextBox txtH_A1 
               Height          =   270
               Index           =   0
               Left            =   1620
               TabIndex        =   21
               Top             =   3585
               Width           =   555
            End
            Begin VB.TextBox txtH_FS 
               Height          =   270
               Left            =   8460
               TabIndex        =   11
               Top             =   1590
               Width           =   555
            End
            Begin VB.TextBox txtH_RVD 
               Height          =   270
               Left            =   8460
               TabIndex        =   8
               Top             =   681
               Width           =   555
            End
            Begin VB.TextBox txtH_RVFW 
               Height          =   270
               Left            =   8460
               TabIndex        =   7
               Top             =   375
               Width           =   555
            End
            Begin VB.TextBox txtH_LVPW 
               Height          =   270
               Left            =   3120
               TabIndex        =   5
               Top             =   1905
               Width           =   555
            End
            Begin VB.TextBox txtH_IVST 
               Height          =   270
               Left            =   3120
               TabIndex        =   4
               Top             =   1599
               Width           =   555
            End
            Begin VB.ComboBox cboH_State 
               Height          =   300
               Index           =   3
               Left            =   8820
               TabIndex        =   35
               Tag             =   "房室状态"
               Top             =   3900
               Width           =   1275
            End
            Begin VB.ComboBox cboH_Atrium 
               Height          =   300
               Index           =   3
               Left            =   5700
               TabIndex        =   32
               Tag             =   "房室位置"
               Top             =   3900
               Width           =   915
            End
            Begin VB.TextBox txtH_LVDD 
               Height          =   270
               Left            =   3120
               TabIndex        =   1
               Top             =   681
               Width           =   555
            End
            Begin VB.TextBox txtH_LVDS