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

📄 frmtempovary.frm

📁 VB6.0编写的医院影像系统
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Begin VB.Form frmTempOvary 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "卵泡检测"
   ClientHeight    =   7635
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   11790
   Icon            =   "frmTempOvary.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        =   29
      Top             =   7020
      Width           =   1575
   End
   Begin VB.CommandButton cmdCover 
      Caption         =   "覆盖(F3)"
      Height          =   495
      Left            =   8040
      TabIndex        =   28
      Top             =   7020
      Width           =   1635
   End
   Begin VB.CommandButton cmdAdd 
      Caption         =   "添加(F2)"
      Height          =   495
      Left            =   6240
      TabIndex        =   27
      Top             =   7020
      Width           =   1635
   End
   Begin VB.PictureBox picOutside 
      CausesValidation=   0   'False
      Height          =   6900
      Left            =   0
      ScaleHeight     =   6840
      ScaleWidth      =   11730
      TabIndex        =   30
      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        =   31
         TabStop         =   0   'False
         Tag             =   "回声"
         Top             =   0
         Width           =   12045
         Begin VB.Frame fraEyes 
            Caption         =   "卵泡"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   700
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   2775
            Left            =   405
            TabIndex        =   32
            Top             =   120
            Width           =   11355
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   6
               Left            =   3465
               TabIndex        =   9
               Text            =   "txtO_measure"
               Top             =   2100
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   7
               Left            =   3960
               TabIndex        =   10
               Text            =   "txtO_measure"
               Top             =   2100
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   8
               Left            =   4455
               TabIndex        =   11
               Text            =   "txtO_measure"
               Top             =   2100
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   9
               Left            =   6720
               TabIndex        =   21
               Text            =   "txtO_measure"
               Top             =   2100
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   10
               Left            =   7215
               TabIndex        =   22
               Text            =   "txtO_measure"
               Top             =   2100
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   11
               Left            =   7710
               TabIndex        =   23
               Text            =   "txtO_measure"
               Top             =   2100
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   0
               Left            =   3465
               TabIndex        =   6
               Text            =   "txtO_measure"
               Top             =   1740
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   1
               Left            =   3960
               TabIndex        =   7
               Text            =   "txtO_measure"
               Top             =   1740
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   2
               Left            =   4455
               TabIndex        =   8
               Text            =   "txtO_measure"
               Top             =   1740
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   3
               Left            =   6720
               TabIndex        =   18
               Text            =   "txtO_measure"
               Top             =   1740
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   4
               Left            =   7215
               TabIndex        =   19
               Text            =   "txtO_measure"
               Top             =   1740
               Width           =   285
            End
            Begin VB.TextBox txtO_measure2 
               Height          =   270
               Index           =   5
               Left            =   7710
               TabIndex        =   20
               Text            =   "txtO_measure"
               Top             =   1740
               Width           =   285
            End
            Begin VB.TextBox txtO_J 
               Height          =   270
               Left            =   10200
               TabIndex        =   26
               Text            =   "txtO_J"
               Top             =   1380
               Width           =   375
            End
            Begin VB.ComboBox cboO_D 
               Height          =   300
               Left            =   9060
               TabIndex        =   25
               Tag             =   "类型"
               Text            =   "cboO_D"
               Top             =   1365
               Width           =   555
            End
            Begin VB.TextBox txtODiagDay 
               BackColor       =   &H80000013&
               DataMember      =   "cmdUS_REPORT"
               DataSource      =   "deUS"
               Height          =   300
               Left            =   270
               Locked          =   -1  'True
               TabIndex        =   52
               TabStop         =   0   'False
               Text            =   "txtDate"
               Top             =   1365
               Width           =   1080
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   12
               Left            =   8385
               TabIndex        =   24
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   11
               Left            =   7710
               TabIndex        =   17
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   10
               Left            =   7215
               TabIndex        =   16
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   9
               Left            =   6720
               TabIndex        =   15
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   8
               Left            =   6075
               TabIndex        =   14
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   7
               Left            =   5580
               TabIndex        =   13
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   6
               Left            =   5085
               TabIndex        =   12
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   5
               Left            =   4455
               TabIndex        =   5
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   4
               Left            =   3960
               TabIndex        =   4
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   3
               Left            =   3465
               TabIndex        =   3
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   2
               Left            =   2835
               TabIndex        =   2
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   1
               Left            =   2340
               TabIndex        =   1
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.TextBox txtO_measure 
               Height          =   270
               Index           =   0
               Left            =   1845
               TabIndex        =   0
               Text            =   "txtO_measure"
               Top             =   1380
               Width           =   285
            End
            Begin VB.Label Label30 
               Caption         =   "×"
               Height          =   150

⌨️ 快捷键说明

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