⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmrxpc_main.frm

📁 医院管理方面的例子
💻 FRM
📖 第 1 页 / 共 5 页
字号:
               Index           =   3
               Left            =   120
               TabIndex        =   136
               Top             =   240
               Width           =   435
            End
            Begin VB.Label Label1 
               BackColor       =   &H00FFC0C0&
               Caption         =   "右:"
               Height          =   285
               Index           =   2
               Left            =   120
               TabIndex        =   135
               Top             =   570
               Width           =   435
            End
         End
         Begin VB.Frame FramTmp 
            BackColor       =   &H00FFC0C0&
            Caption         =   "3、溢液状态"
            ForeColor       =   &H00FF0000&
            Height          =   1035
            Index           =   3
            Left            =   120
            TabIndex        =   81
            Top             =   12360
            Width           =   8835
            Begin VB.Frame yiye2 
               BackColor       =   &H00FFC0C0&
               Enabled         =   0   'False
               Height          =   585
               Left            =   1710
               TabIndex        =   157
               Top             =   450
               Width           =   7125
               Begin VB.CheckBox ChkfdbSpgRS 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "单管"
                  Height          =   210
                  Left            =   480
                  TabIndex        =   163
                  Top             =   270
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgRM 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "多管"
                  Height          =   210
                  Left            =   1290
                  TabIndex        =   162
                  Top             =   270
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgRR 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "清水样"
                  Height          =   210
                  Left            =   2130
                  TabIndex        =   161
                  Top             =   285
                  Width           =   945
               End
               Begin VB.CheckBox ChkfdbSpgRY 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "黄色"
                  Height          =   210
                  Left            =   3300
                  TabIndex        =   160
                  Top             =   285
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgRL 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "乳样"
                  Height          =   210
                  Left            =   4170
                  TabIndex        =   159
                  Top             =   285
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgRB 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "血样"
                  Height          =   210
                  Left            =   4980
                  TabIndex        =   158
                  Top             =   255
                  Width           =   945
               End
            End
            Begin VB.Frame yiye1 
               BackColor       =   &H00FFC0C0&
               Enabled         =   0   'False
               Height          =   555
               Left            =   1710
               TabIndex        =   150
               Top             =   0
               Width           =   7125
               Begin VB.CheckBox ChkfdbSpgLS 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "单管"
                  Height          =   300
                  Left            =   480
                  TabIndex        =   156
                  Top             =   210
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgLM 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "多管"
                  Height          =   270
                  Left            =   1290
                  TabIndex        =   155
                  Top             =   210
                  Width           =   765
               End
               Begin VB.CheckBox ChkfdbSpgLR 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "清水样"
                  Height          =   210
                  Left            =   2130
                  TabIndex        =   154
                  Top             =   210
                  Width           =   945
               End
               Begin VB.CheckBox ChkfdbSpgLY 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "黄色"
                  Height          =   210
                  Left            =   3300
                  TabIndex        =   153
                  Top             =   210
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgLL 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "乳样"
                  Height          =   210
                  Left            =   4170
                  TabIndex        =   152
                  Top             =   240
                  Width           =   735
               End
               Begin VB.CheckBox ChkfdbSpgLB 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "血样"
                  Height          =   210
                  Left            =   4980
                  TabIndex        =   151
                  Top             =   210
                  Width           =   765
               End
            End
            Begin VB.CheckBox ChkfdbSpgRE 
               BackColor       =   &H00FFC0C0&
               Caption         =   "无"
               Height          =   210
               Left            =   750
               TabIndex        =   30
               Top             =   690
               Value           =   1  'Checked
               Width           =   585
            End
            Begin VB.CheckBox ChkfdbSpgLE 
               BackColor       =   &H00FFC0C0&
               Caption         =   "无"
               Height          =   210
               Left            =   750
               TabIndex        =   29
               Top             =   300
               Value           =   1  'Checked
               Width           =   585
            End
            Begin VB.Label Label1 
               BackColor       =   &H00FFC0C0&
               Caption         =   "左:"
               Height          =   285
               Index           =   5
               Left            =   150
               TabIndex        =   149
               Top             =   300
               Width           =   435
            End
            Begin VB.Label Label1 
               BackColor       =   &H00FFC0C0&
               Caption         =   "右:"
               Height          =   285
               Index           =   4
               Left            =   150
               TabIndex        =   148
               Top             =   690
               Width           =   435
            End
         End
         Begin VB.Frame FramTmp 
            BackColor       =   &H00FFC0C0&
            Caption         =   "4、腺体状况"
            ForeColor       =   &H00FF0000&
            Height          =   915
            Index           =   4
            Left            =   120
            TabIndex        =   80
            Top             =   13470
            Width           =   8835
            Begin VB.Frame xianti1 
               BackColor       =   &H00FFC0C0&
               Enabled         =   0   'False
               Height          =   525
               Left            =   1710
               TabIndex        =   166
               Top             =   0
               Width           =   7125
               Begin VB.CheckBox ChkfdbglandLBp 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "结节肿块"
                  Height          =   210
                  Left            =   4650
                  TabIndex        =   170
                  Top             =   210
                  Width           =   1185
               End
               Begin VB.CheckBox ChkfdbglandLD 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "弥散结节"
                  Height          =   210
                  Left            =   3270
                  TabIndex        =   169
                  Top             =   210
                  Width           =   1155
               End
               Begin VB.CheckBox ChkfdbglandLBar 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "条索状"
                  Height          =   210
                  Left            =   1950
                  TabIndex        =   168
                  Top             =   210
                  Width           =   945
               End
               Begin VB.CheckBox ChkfdbglandLH 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "片状增生"
                  Height          =   210
                  Left            =   480
                  TabIndex        =   167
                  Top             =   210
                  Width           =   1155
               End
            End
            Begin VB.CheckBox ChkfdbglandRN 
               BackColor       =   &H00FFC0C0&
               Caption         =   "正常"
               Height          =   210
               Left            =   750
               TabIndex        =   32
               Top             =   600
               Value           =   1  'Checked
               Width           =   735
            End
            Begin VB.CheckBox ChkfdbglandLN 
               BackColor       =   &H00FFC0C0&
               Caption         =   "正常"
               Height          =   210
               Left            =   750
               TabIndex        =   31
               Top             =   270
               Value           =   1  'Checked
               Width           =   765
            End
            Begin VB.Frame xianti2 
               BackColor       =   &H00FFC0C0&
               Enabled         =   0   'False
               Height          =   525
               Left            =   1710
               TabIndex        =   171
               Top             =   390
               Width           =   7125
               Begin VB.CheckBox ChkfdbglandRBp 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "结节肿块"
                  Height          =   210
                  Left            =   4650
                  TabIndex        =   175
                  Top             =   210
                  Width           =   1155
               End
               Begin VB.CheckBox ChkfdbglandRD 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "弥散结节"
                  Height          =   210
                  Left            =   3270
                  TabIndex        =   174
                  Top             =   210
                  Width           =   1155
               End
               Begin VB.CheckBox ChkfdbglandRBar 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "条索状"
                  Height          =   210
                  Left            =   1950
                  TabIndex        =   173
                  Top             =   180
                  Width           =   945
               End
               Begin VB.CheckBox ChkfdbglandRH 
                  BackColor       =   &H00FFC0C0&
                  Caption         =   "片状增生"
                  Height          =   210
                  Left            =   480
                  TabIndex        =   172
                  Top             =   210
                  Width           =   1155
               End
            End
            Begin VB.Label Label1 
               BackColor       =   &H00FFC0C0&
               Caption         =   "右:"
               Height          =   285
               Index           =   7
               Left            =   120
               TabIndex        =   165
               Top             =   600
               Width           =   435
            End
            Begin VB.Label Label1 
               BackColor       =   &H00FFC0C0&
               Caption         =   "左:"
               Height          =   285
               Index           =   6
               Left            =   120
               TabIndex        =   164

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -