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

📄 frmzggztj.frm

📁 一个管理程序(实用)VB
💻 FRM
📖 第 1 页 / 共 3 页
字号:
VERSION 5.00
Begin VB.Form frmZggztj 
   Caption         =   "实验实习工作"
   ClientHeight    =   7305
   ClientLeft      =   1110
   ClientTop       =   345
   ClientWidth     =   9435
   LinkTopic       =   "Form2"
   MaxButton       =   0   'False
   ScaleHeight     =   7305
   ScaleWidth      =   9435
   StartUpPosition =   2  '屏幕中心
   Begin VB.TextBox txtFields 
      DataField       =   "学生班级5"
      DataSource      =   "Data1"
      Height          =   615
      Index           =   31
      Left            =   1200
      MousePointer    =   99  'Custom
      TabIndex        =   87
      Text            =   " "
      Top             =   5520
      Width           =   6255
   End
   Begin VB.CommandButton Command1 
      Caption         =   "统计"
      Height          =   375
      Left            =   8520
      TabIndex        =   86
      Top             =   6480
      Width           =   615
   End
   Begin VB.Frame Frame4 
      Caption         =   "工作量小计"
      Height          =   975
      Left            =   7800
      TabIndex        =   85
      Top             =   5280
      Width           =   1455
      Begin VB.TextBox txtFields 
         DataField       =   "工作量小计"
         DataSource      =   "Data1"
         Height          =   390
         Index           =   28
         Left            =   360
         MousePointer    =   99  'Custom
         TabIndex        =   92
         Text            =   " "
         Top             =   360
         Width           =   735
      End
   End
   Begin VB.Frame Frame3 
      Caption         =   "工作量"
      Height          =   4335
      Left            =   7800
      TabIndex        =   73
      Top             =   720
      Width           =   1455
      Begin VB.TextBox txtFields 
         DataField       =   "工作量1"
         DataSource      =   "Data1"
         Height          =   390
         Index           =   35
         Left            =   120
         MousePointer    =   99  'Custom
         TabIndex        =   89
         Text            =   " "
         Top             =   3600
         Width           =   495
      End
      Begin VB.TextBox txtFields 
         DataField       =   "工作量"
         DataSource      =   "Data1"
         Height          =   390
         Index           =   33
         Left            =   120
         MousePointer    =   99  'Custom
         TabIndex        =   88
         Text            =   " "
         Top             =   1920
         Width           =   495
      End
      Begin VB.Label Label46 
         Caption         =   "小时"
         Height          =   255
         Left            =   720
         TabIndex        =   84
         Top             =   3720
         Width           =   375
      End
      Begin VB.Label Label45 
         Caption         =   "小时"
         Height          =   255
         Left            =   720
         TabIndex        =   83
         Top             =   2040
         Width           =   375
      End
   End
   Begin VB.TextBox txtFields 
      DataField       =   "日期"
      DataSource      =   "Data1"
      Height          =   270
      Index           =   29
      Left            =   7560
      MousePointer    =   99  'Custom
      TabIndex        =   72
      Text            =   " "
      Top             =   360
      Width           =   1575
   End
   Begin VB.Frame Frame2 
      Caption         =   "指导实习"
      Height          =   1455
      Left            =   120
      TabIndex        =   52
      Top             =   3480
      Width           =   7455
      Begin VB.TextBox txtFields 
         DataField       =   "实习天数2"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   27
         Left            =   5760
         MousePointer    =   99  'Custom
         TabIndex        =   70
         Text            =   " "
         Top             =   1080
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "实习天数1"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   26
         Left            =   5760
         MousePointer    =   99  'Custom
         TabIndex        =   69
         Text            =   " "
         Top             =   720
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "实习天数"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   25
         Left            =   5760
         MousePointer    =   99  'Custom
         TabIndex        =   68
         Text            =   " "
         Top             =   360
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "实习地点2"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   24
         Left            =   3480
         MousePointer    =   99  'Custom
         TabIndex        =   64
         Text            =   " "
         Top             =   1080
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "实习地点1"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   23
         Left            =   3480
         MousePointer    =   99  'Custom
         TabIndex        =   63
         Text            =   " "
         Top             =   720
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "实习地点"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   22
         Left            =   3480
         MousePointer    =   99  'Custom
         TabIndex        =   62
         Text            =   " "
         Top             =   360
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "班级2"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   21
         Left            =   600
         MousePointer    =   99  'Custom
         TabIndex        =   58
         Text            =   " "
         Top             =   1080
         Width           =   1575
      End
      Begin VB.TextBox txtFields 
         DataField       =   "班级1"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   20
         Left            =   600
         MousePointer    =   99  'Custom
         TabIndex        =   57
         Text            =   " "
         Top             =   720
         Width           =   1575
      End
      Begin VB.TextBox txtFields 
         DataField       =   "班级"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   19
         Left            =   600
         MousePointer    =   99  'Custom
         TabIndex        =   56
         Text            =   " "
         Top             =   360
         Width           =   1575
      End
      Begin VB.Label Label33 
         Caption         =   "实习天数"
         Height          =   255
         Left            =   4920
         TabIndex        =   67
         Top             =   1080
         Width           =   735
      End
      Begin VB.Label Label32 
         Caption         =   "实习天数"
         Height          =   255
         Left            =   4920
         TabIndex        =   66
         Top             =   720
         Width           =   735
      End
      Begin VB.Label Label31 
         Caption         =   "实习天数"
         Height          =   255
         Left            =   4920
         TabIndex        =   65
         Top             =   360
         Width           =   735
      End
      Begin VB.Label Label30 
         Caption         =   "实习地点"
         Height          =   255
         Left            =   2640
         TabIndex        =   61
         Top             =   1080
         Width           =   735
      End
      Begin VB.Label Label29 
         Caption         =   "实习地点"
         Height          =   255
         Left            =   2640
         TabIndex        =   60
         Top             =   720
         Width           =   735
      End
      Begin VB.Label Label28 
         Caption         =   "实习地点"
         Height          =   255
         Left            =   2640
         TabIndex        =   59
         Top             =   360
         Width           =   735
      End
      Begin VB.Label Label27 
         Caption         =   "班级"
         Height          =   255
         Left            =   120
         TabIndex        =   55
         Top             =   1080
         Width           =   375
      End
      Begin VB.Label Label26 
         Caption         =   "班级"
         Height          =   255
         Left            =   120
         TabIndex        =   54
         Top             =   720
         Width           =   375
      End
      Begin VB.Label Label25 
         Caption         =   "班级"
         Height          =   255
         Left            =   120
         TabIndex        =   53
         Top             =   360
         Width           =   375
      End
   End
   Begin VB.Frame Frame1 
      Caption         =   "指导实验"
      Height          =   2535
      Left            =   120
      TabIndex        =   15
      Top             =   720
      Width           =   7455
      Begin VB.CommandButton cmdsave1 
         Caption         =   "保存"
         Height          =   255
         Left            =   4200
         TabIndex        =   91
         Top             =   2160
         Width           =   915
      End
      Begin VB.CommandButton cmdcontinue1 
         Caption         =   "继续添加"
         Height          =   255
         Left            =   2520
         TabIndex        =   90
         Top             =   2160
         Width           =   915
      End
      Begin VB.TextBox txtFields 
         DataField       =   "计划学时4"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   36
         Left            =   6360
         MousePointer    =   99  'Custom
         TabIndex        =   82
         Text            =   " "
         Top             =   1800
         Width           =   975
      End
      Begin VB.TextBox txtFields 
         DataField       =   "组共4"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   34
         Left            =   4320
         MousePointer    =   99  'Custom
         TabIndex        =   81
         Text            =   " "
         Top             =   1800
         Width           =   615
      End
      Begin VB.TextBox txtFields 
         DataField       =   "指导4"
         DataSource      =   "Data1"
         Height          =   270
         Index           =   32
         Left            =   3120
         MousePointer    =   99  'Custom
         TabIndex        =   80
         Text            =   " "
         Top             =   1800
         Width           =   615

⌨️ 快捷键说明

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