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

📄 frmexampledb.frm

📁 一个外国人所编非常酷的数据库综合程序源码
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Begin VB.Form frmExampledb 
   AutoRedraw      =   -1  'True
   BorderStyle     =   0  'None
   Caption         =   "Browse Students"
   ClientHeight    =   6810
   ClientLeft      =   60
   ClientTop       =   -225
   ClientWidth     =   11250
   ControlBox      =   0   'False
   Icon            =   "frmExampledb.frx":0000
   KeyPreview      =   -1  'True
   LockControls    =   -1  'True
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   MinButton       =   0   'False
   NegotiateMenus  =   0   'False
   Picture         =   "frmExampledb.frx":08CA
   ScaleHeight     =   6810
   ScaleWidth      =   11250
   ShowInTaskbar   =   0   'False
   Begin VB.CommandButton btnQKeys 
      Caption         =   "&Quick Keys"
      Height          =   315
      Left            =   9870
      TabIndex        =   88
      Top             =   5280
      Width           =   1095
   End
   Begin VB.CommandButton btnHelp 
      Caption         =   "&Help"
      Height          =   285
      Left            =   9870
      TabIndex        =   86
      Top             =   4980
      Width           =   1065
   End
   Begin VB.CommandButton btnNotes 
      Caption         =   "N&otes"
      Height          =   285
      Left            =   9870
      TabIndex        =   85
      Top             =   4680
      Width           =   1035
   End
   Begin VB.ListBox List1 
      BackColor       =   &H00C0E0FF&
      Height          =   645
      Left            =   240
      TabIndex        =   83
      Top             =   4830
      Width           =   2565
   End
   Begin MSDataListLib.DataList DataList1 
      Height          =   3570
      Left            =   240
      TabIndex        =   82
      Top             =   870
      Width           =   2565
      _ExtentX        =   4524
      _ExtentY        =   6297
      _Version        =   393216
      BackColor       =   12640511
   End
   Begin VB.TextBox txtUpdate 
      Alignment       =   1  'Right Justify
      BackColor       =   &H00C0E0FF&
      Height          =   285
      Left            =   6930
      Locked          =   -1  'True
      TabIndex        =   0
      TabStop         =   0   'False
      Top             =   585
      Width           =   2265
   End
   Begin VB.TextBox txtID 
      BackColor       =   &H00C0E0FF&
      Height          =   285
      Left            =   4920
      Locked          =   -1  'True
      TabIndex        =   27
      TabStop         =   0   'False
      Top             =   585
      Width           =   735
   End
   Begin VB.TextBox txtFirst_Name 
      BackColor       =   &H00C0E0FF&
      Height          =   285
      Left            =   5940
      MaxLength       =   20
      TabIndex        =   2
      Top             =   1710
      Width           =   3255
   End
   Begin VB.TextBox txtLast_Name 
      BackColor       =   &H00C0E0FF&
      Height          =   285
      Left            =   5940
      MaxLength       =   30
      TabIndex        =   1
      Top             =   1305
      Width           =   3255
   End
   Begin VB.CommandButton btnExit 
      Caption         =   "E&xit"
      Height          =   285
      Left            =   9870
      TabIndex        =   44
      Top             =   4380
      Width           =   1065
   End
   Begin VB.CommandButton btnPrint 
      Caption         =   "&Print"
      Height          =   285
      Left            =   9870
      TabIndex        =   43
      Top             =   4080
      Width           =   1065
   End
   Begin VB.CommandButton btnColors 
      Caption         =   "&Colors"
      Height          =   285
      Left            =   9870
      TabIndex        =   42
      Top             =   3780
      Width           =   1065
   End
   Begin VB.CommandButton btnNew 
      Caption         =   "&New"
      Height          =   285
      Left            =   9870
      TabIndex        =   41
      Top             =   3480
      Width           =   1065
   End
   Begin VB.CommandButton btnDelete 
      Caption         =   "&Delete"
      Height          =   285
      Left            =   9870
      TabIndex        =   40
      Top             =   3180
      Width           =   1065
   End
   Begin VB.CommandButton btnSave 
      Caption         =   "&Save"
      Height          =   285
      Left            =   9870
      TabIndex        =   39
      Top             =   2880
      Width           =   1065
   End
   Begin VB.CommandButton btnReload 
      Caption         =   "&Reload"
      Height          =   285
      Left            =   9870
      TabIndex        =   38
      Top             =   2580
      Width           =   1065
   End
   Begin VB.Timer Timer1 
      Interval        =   500
      Left            =   9900
      Top             =   960
   End
   Begin VB.Frame Frame1 
      BackColor       =   &H00404040&
      Caption         =   "Post Graduation"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   9
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   -1  'True
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFC0&
      Height          =   2325
      Index           =   3
      Left            =   4410
      TabIndex        =   72
      Tag             =   "ButtonLabel"
      Top             =   2250
      Visible         =   0   'False
      Width           =   4935
      Begin VB.TextBox txtEmployer 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   40
         TabIndex        =   26
         Top             =   1755
         Width           =   3240
      End
      Begin VB.TextBox txtJob_Title 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   30
         TabIndex        =   25
         Top             =   1395
         Width           =   3240
      End
      Begin VB.TextBox txtInstitution 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   35
         TabIndex        =   24
         Top             =   720
         Width           =   3240
      End
      Begin VB.TextBox txtGrad_Studies 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   30
         TabIndex        =   23
         Top             =   360
         Width           =   3255
      End
      Begin VB.Label Label21 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Employer"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   615
         TabIndex        =   76
         Tag             =   "Label"
         Top             =   1770
         Width           =   810
      End
      Begin VB.Label Label20 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Job Title"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   240
         TabIndex        =   75
         Tag             =   "Label"
         Top             =   1440
         Width           =   1185
      End
      Begin VB.Label Label17 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Institution"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   225
         TabIndex        =   74
         Tag             =   "Label"
         Top             =   750
         Width           =   1215
      End
      Begin VB.Label Label6 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Program"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   210
         TabIndex        =   73
         Tag             =   "Label"
         Top             =   390
         Width           =   1215
      End
   End
   Begin VB.Frame Frame1 
      BackColor       =   &H00404040&
      Caption         =   "Education"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   9
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   -1  'True
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFC0&
      Height          =   2325
      Index           =   2
      Left            =   4410
      TabIndex        =   64
      Tag             =   "ButtonLabel"
      Top             =   2250
      Visible         =   0   'False
      Width           =   4935
      Begin VB.TextBox txtProgram 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   50
         TabIndex        =   16
         Top             =   360
         Width           =   3255
      End
      Begin VB.TextBox txtProgram_Length 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   5
         TabIndex        =   17
         Top             =   720
         Width           =   360
      End
      Begin VB.TextBox txtLast_Course 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   2940
         MaxLength       =   30
         TabIndex        =   18
         Top             =   750
         Width           =   1845
      End
      Begin VB.TextBox txtFull_Part 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   4440
         MaxLength       =   1
         TabIndex        =   20
         Top             =   1110
         Width           =   345
      End
      Begin VB.TextBox txtCurrent_Past 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1530
         MaxLength       =   1
         TabIndex        =   19
         Top             =   1080
         Width           =   360
      End
      Begin VB.TextBox txtEnroll 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   1035
         MaxLength       =   30
         TabIndex        =   21
         Top             =   1800
         Width           =   1305
      End
      Begin VB.TextBox txtGrad 
         BackColor       =   &H00C0E0FF&
         Height          =   285
         Left            =   3480
         MaxLength       =   50
         TabIndex        =   22
         Top             =   1800
         Width           =   1305
      End
      Begin VB.Label Label16 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Program"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   225
         TabIndex        =   71
         Tag             =   "Label"
         Top             =   360
         Width           =   1215
      End
      Begin VB.Label Label15 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Program Length"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   225
         TabIndex        =   70
         Tag             =   "Label"
         Top             =   750
         Width           =   1215
      End
      Begin VB.Label Label14 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Last Course"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   1995
         TabIndex        =   69
         Tag             =   "Label"
         Top             =   750
         Width           =   840
      End
      Begin VB.Label Label13 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Full or Part Time"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   3075
         TabIndex        =   68
         Tag             =   "Label"
         Top             =   1140
         Width           =   1260
      End
      Begin VB.Label Label12 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Current or Past"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   240
         TabIndex        =   67
         Tag             =   "Label"
         Top             =   1110
         Width           =   1185
      End
      Begin VB.Label Label4 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Enroll Date"
         ForeColor       =   &H00C0FFC0&
         Height          =   255
         Left            =   120
         TabIndex        =   66
         Tag             =   "Label"
         Top             =   1830
         Width           =   855
      End
      Begin VB.Label Label3 
         Alignment       =   1  'Right Justify
         BackStyle       =   0  'Transparent
         Caption         =   "Completion"

⌨️ 快捷键说明

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