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

📄 frmtjresult.frm

📁 本系统可用于医院和专业体检中心的健康体检管理
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Object = "{A964BDA3-3E93-11CF-9A0F-9E6261DACD1C}#2.0#0"; "resize32.ocx"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form frmTJResult 
   BackColor       =   &H80000018&
   BorderStyle     =   1  'Fixed Single
   Caption         =   "个人体检档案"
   ClientHeight    =   8400
   ClientLeft      =   45
   ClientTop       =   435
   ClientWidth     =   10875
   Icon            =   "frmTJResult.frx":0000
   LinkTopic       =   "Form1"
   LockControls    =   -1  'True
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   8400
   ScaleWidth      =   10875
   StartUpPosition =   1  '所有者中心
   Begin VB.Frame Frame2 
      BackColor       =   &H80000018&
      Caption         =   "科室小结"
      Height          =   1065
      Left            =   3180
      TabIndex        =   256
      Top             =   5130
      Width           =   7605
      Begin VB.TextBox txtXJie 
         BackColor       =   &H8000000F&
         Height          =   780
         Left            =   120
         Locked          =   -1  'True
         MultiLine       =   -1  'True
         ScrollBars      =   2  'Vertical
         TabIndex        =   257
         Top             =   210
         Width           =   7365
      End
   End
   Begin VB.PictureBox picParent 
      AutoRedraw      =   -1  'True
      BackColor       =   &H80000018&
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   9
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   3600
      Left            =   3150
      ScaleHeight     =   3540
      ScaleWidth      =   7335
      TabIndex        =   11
      Top             =   1425
      Width           =   7395
      Begin VB.PictureBox picChild 
         Appearance      =   0  'Flat
         AutoRedraw      =   -1  'True
         BackColor       =   &H80000018&
         BorderStyle     =   0  'None
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H80000008&
         Height          =   3540
         Left            =   0
         ScaleHeight     =   3540
         ScaleMode       =   0  'User
         ScaleWidth      =   7335
         TabIndex        =   12
         Top             =   0
         Width           =   7395
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   80
            Left            =   0
            Picture         =   "frmTJResult.frx":1982
            Style           =   1  'Graphical
            TabIndex        =   351
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   79
            Left            =   0
            Picture         =   "frmTJResult.frx":1E84
            Style           =   1  'Graphical
            TabIndex        =   350
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   78
            Left            =   0
            Picture         =   "frmTJResult.frx":2386
            Style           =   1  'Graphical
            TabIndex        =   349
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   77
            Left            =   0
            Picture         =   "frmTJResult.frx":2888
            Style           =   1  'Graphical
            TabIndex        =   348
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   76
            Left            =   0
            Picture         =   "frmTJResult.frx":2D8A
            Style           =   1  'Graphical
            TabIndex        =   347
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   75
            Left            =   0
            Picture         =   "frmTJResult.frx":328C
            Style           =   1  'Graphical
            TabIndex        =   346
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   74
            Left            =   0
            Picture         =   "frmTJResult.frx":378E
            Style           =   1  'Graphical
            TabIndex        =   345
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   73
            Left            =   0
            Picture         =   "frmTJResult.frx":3C90
            Style           =   1  'Graphical
            TabIndex        =   344
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   72
            Left            =   0
            Picture         =   "frmTJResult.frx":4192
            Style           =   1  'Graphical
            TabIndex        =   343
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   71
            Left            =   0
            Picture         =   "frmTJResult.frx":4694
            Style           =   1  'Graphical
            TabIndex        =   342
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   70
            Left            =   0
            Picture         =   "frmTJResult.frx":4B96
            Style           =   1  'Graphical
            TabIndex        =   341
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   69
            Left            =   0
            Picture         =   "frmTJResult.frx":5098
            Style           =   1  'Graphical
            TabIndex        =   340
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   68
            Left            =   0
            Picture         =   "frmTJResult.frx":559A
            Style           =   1  'Graphical
            TabIndex        =   339
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   67
            Left            =   0
            Picture         =   "frmTJResult.frx":5A9C
            Style           =   1  'Graphical
            TabIndex        =   338
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   66
            Left            =   0
            Picture         =   "frmTJResult.frx":5F9E
            Style           =   1  'Graphical
            TabIndex        =   337
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   65
            Left            =   0
            Picture         =   "frmTJResult.frx":64A0
            Style           =   1  'Graphical
            TabIndex        =   336
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   64
            Left            =   0
            Picture         =   "frmTJResult.frx":69A2
            Style           =   1  'Graphical
            TabIndex        =   335
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   63
            Left            =   0
            Picture         =   "frmTJResult.frx":6EA4
            Style           =   1  'Graphical
            TabIndex        =   334
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   62
            Left            =   0
            Picture         =   "frmTJResult.frx":73A6
            Style           =   1  'Graphical
            TabIndex        =   333
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   61
            Left            =   0
            Picture         =   "frmTJResult.frx":78A8
            Style           =   1  'Graphical
            TabIndex        =   332
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   60
            Left            =   0
            Picture         =   "frmTJResult.frx":7DAA
            Style           =   1  'Graphical
            TabIndex        =   331
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   59
            Left            =   0
            Picture         =   "frmTJResult.frx":82AC
            Style           =   1  'Graphical
            TabIndex        =   330
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   58
            Left            =   0
            Picture         =   "frmTJResult.frx":87AE
            Style           =   1  'Graphical
            TabIndex        =   329
            Top             =   0
            Visible         =   0   'False
            Width           =   315
         End
         Begin VB.CommandButton cmdPhoto 
            Height          =   315
            Index           =   57
            Left            =   0
            Picture         =   "frmTJResult.frx":8CB0
            Style           =   1  'Graphical
            TabIndex        =   328
            Top             =   0
            Visible         =   0   'False
            Width           =   315

⌨️ 快捷键说明

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