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

📄 frm_yxzz.frm

📁 可运行的一个医院住院管理系统
💻 FRM
📖 第 1 页 / 共 5 页
字号:
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column07 
               DataField       =   "性别"
               Caption         =   "性别"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column08 
               DataField       =   "工作单位"
               Caption         =   "工作单位"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column09 
               DataField       =   "现住址"
               Caption         =   "现住址"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column10 
               DataField       =   "疾病诊断"
               Caption         =   "疾病诊断"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column11 
               DataField       =   "预后估计"
               Caption         =   "预后估计"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column12 
               DataField       =   "医生建议"
               Caption         =   "医生建议"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column13 
               DataField       =   "出证机构"
               Caption         =   "出证机构"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            SplitCount      =   1
            BeginProperty Split0 
               BeginProperty Column00 
                  Object.Visible         =   0   'False
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column01 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column02 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column03 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column04 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column05 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column06 
                  ColumnWidth     =   1094.74
               EndProperty
               BeginProperty Column07 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column08 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column09 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column10 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column11 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column12 
                  ColumnWidth     =   2085.166
               EndProperty
               BeginProperty Column13 
                  ColumnWidth     =   2085.166
               EndProperty
            EndProperty
         End
         Begin VB.TextBox Text47 
            DataField       =   "挂号单号"
            DataSource      =   "Adodc6"
            Height          =   375
            Left            =   1080
            TabIndex        =   153
            Text            =   "Text47"
            Top             =   1320
            Width           =   1455
         End
      End
      Begin VB.ComboBox Combo9 
         BackColor       =   &H00C0FFC0&
         Height          =   300
         Left            =   1560
         TabIndex        =   99
         Top             =   6520
         Width           =   1575
      End
      Begin VB.Frame Frame5 
         Caption         =   "书写病程记录"
         Height          =   6375
         Left            =   -74880
         TabIndex        =   87
         Top             =   480
         Width           =   9975
         Begin VB.ComboBox Combo15 
            Height          =   300
            Left            =   1150
            Style           =   2  'Dropdown List
            TabIndex        =   160
            Top             =   480
            Width           =   1335
         End
         Begin VB.Frame Frame11 
            Caption         =   "病程记录查询 [按回车键查询]"
            ForeColor       =   &H00C00000&
            Height          =   615
            Left            =   6360
            TabIndex        =   145
            Top             =   5520
            Width           =   3495
            Begin VB.TextBox Text24 
               BackColor       =   &H00FFC0C0&
               Height          =   300
               Left            =   1920
               TabIndex        =   148
               Top             =   240
               Width           =   1455
            End
            Begin VB.ComboBox Combo13 
               BackColor       =   &H00FFC0C0&
               Height          =   300
               ItemData        =   "frm_yxzz.frx":00D4
               Left            =   120
               List            =   "frm_yxzz.frx":00DE
               Style           =   2  'Dropdown List
               TabIndex        =   146
               Top             =   240
               Width           =   1215
            End
            Begin VB.Label Label55 
               Caption         =   "等于"
               Height          =   200
               Left            =   1440
               TabIndex        =   147
               Top             =   360
               Width           =   495
            End
         End
         Begin VB.CommandButton Command8 
            Caption         =   "保存"
            Enabled         =   0   'False
            Height          =   375
            Left            =   8040
            TabIndex        =   97
            Top             =   480
            Width           =   855
         End
         Begin MSDataGridLib.DataGrid DataGrid4 
            Bindings        =   "frm_yxzz.frx":00F2
            Height          =   4455
            Left            =   6360
            TabIndex        =   96
            Top             =   960
            Width           =   3495
            _ExtentX        =   6165
            _ExtentY        =   7858
            _Version        =   393216
            AllowUpdate     =   0   'False
            HeadLines       =   1
            RowHeight       =   15
            FormatLocked    =   -1  'True
            BeginProperty HeadFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ColumnCount     =   6
            BeginProperty Column00 
               DataField       =   "挂号单号"
               Caption         =   "挂号单号"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column01 
               DataField       =   "书写时间"
               Caption         =   "书写时间"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column02 
               DataField       =   "标题"
               Caption         =   "标题"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column03 
               DataField       =   "书写者"
               Caption         =   "书写者"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column04 
               DataField       =   "审核标志"
               Caption         =   "审核标志"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0
               EndProperty
            EndProperty
            BeginProperty Column05 
               DataField       =   "内容"
               Caption         =   "内容"
               BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                  Type            =   0
                  Format          =   ""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   0

⌨️ 快捷键说明

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