学生管理系统3.txt

来自「学生学藉管理 系统:A simple student information m」· 文本 代码 · 共 564 行 · 第 1/2 页

TXT
564
字号
VERSION 5.00 
Begin VB.Form form1  
   Caption         =   "学生档案管理系统" 
   ClientHeight    =   5760 
   ClientLeft      =   2355 
   ClientTop       =   2130 
   ClientWidth     =   7545 
   LinkTopic       =   "Form1" 
   Picture         =   "Form1.frx":0000 
   ScaleHeight     =   5760 
   ScaleWidth      =   7545 
   Begin VB.TextBox Text7  
      BackColor       =   &H00008000& 
      Height          =   375 
      Left            =   4680 
      TabIndex        =   20 
      Top             =   1200 
      Width           =   1815 
   End 
   Begin VB.CommandButton Command7  
      Height          =   375 
      Left            =   5880 
      Picture         =   "Form1.frx":0442 
      Style           =   1  'Graphical 
      TabIndex        =   18 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.CommandButton Command6  
      Caption         =   "删除" 
      Height          =   375 
      Left            =   5040 
      TabIndex        =   17 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.CommandButton Command5  
      Caption         =   "修改" 
      Height          =   375 
      Left            =   4200 
      TabIndex        =   16 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.CommandButton Command4  
      Caption         =   "更新" 
      Height          =   375 
      Left            =   3360 
      TabIndex        =   15 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.CommandButton Command3  
      Caption         =   "查找" 
      DownPicture     =   "Form1.frx":0884 
      Height          =   375 
      Left            =   2520 
      Picture         =   "Form1.frx":0B8E 
      TabIndex        =   14 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.CommandButton Command2  
      Caption         =   "添加" 
      Height          =   375 
      Left            =   1680 
      Picture         =   "Form1.frx":0FD0 
      TabIndex        =   13 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.CommandButton Command1  
      Height          =   375 
      Left            =   840 
      MouseIcon       =   "Form1.frx":1412 
      MousePointer    =   4  'Icon 
      Picture         =   "Form1.frx":1854 
      Style           =   1  'Graphical 
      TabIndex        =   12 
      Top             =   4440 
      Width           =   855 
   End 
   Begin VB.TextBox Text6  
      BackColor       =   &H00008000& 
      DataField       =   "csdate" 
      DataSource      =   "Data1" 
      Height          =   375 
      Left            =   4680 
      TabIndex        =   11 
      Top             =   2160 
      Width           =   2055 
   End 
   Begin VB.TextBox Text5  
      BackColor       =   &H00008000& 
      DataField       =   "adress" 
      DataSource      =   "Data1" 
      Height          =   375 
      Left            =   4560 
      TabIndex        =   9 
      Top             =   3360 
      Width           =   2415 
   End 
   Begin VB.TextBox Text4  
      BackColor       =   &H00008000& 
      DataField       =   "telephon" 
      DataSource      =   "Data1" 
      Height          =   375 
      Left            =   1440 
      TabIndex        =   8 
      Top             =   3360 
      Width           =   1695 
   End 
   Begin VB.TextBox Text3  
      BackColor       =   &H00008000& 
      DataField       =   "sex" 
      DataSource      =   "Data1" 
      Height          =   375 
      Left            =   1440 
      TabIndex        =   7 
      Top             =   2160 
      Width           =   735 
   End 
   Begin VB.TextBox Text2  
      BackColor       =   &H00008000& 
      DataField       =   "name" 
      DataSource      =   "Data1" 
      Height          =   375 
      Left            =   1440 
      TabIndex        =   6 
      Top             =   1200 
      Width           =   1335 
   End 
   Begin VB.TextBox Text1  
      BackColor       =   &H00008000& 
      DataField       =   "class" 
      DataSource      =   "Data1" 
      Height          =   375 
      Left            =   1440 
      TabIndex        =   5 
      Top             =   240 
      Width           =   1335 
   End 
   Begin VB.Label Label7  
      BackStyle       =   0  'Transparent 
      Caption         =   "学号" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   10.5 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   3480 
      TabIndex        =   19 
      Top             =   1200 
      Width           =   855 
   End 
   Begin VB.Label Label6  
      BackStyle       =   0  'Transparent 
      Caption         =   "出生日期:" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   10.5 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   3480 
      TabIndex        =   10 
      Top             =   2160 
      Width           =   1455 
   End 
   Begin VB.Label Label5  
      BackStyle       =   0  'Transparent 
      Caption         =   "家庭住址:" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   10.5 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   3480 
      TabIndex        =   4 
      Top             =   3360 
      Width           =   1215 
   End 
   Begin VB.Label Label4  
      BackStyle       =   0  'Transparent 
      Caption         =   "姓名:" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   10.5 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   360 
      TabIndex        =   3 
      Top             =   1200 
      Width           =   855 
   End 
   Begin VB.Label Label3  
      BackStyle       =   0  'Transparent 
      Caption         =   "联系电话:" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   10.5 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   360 
      TabIndex        =   2 
      Top             =   3360 
      Width           =   1215 
   End 
   Begin VB.Label Label2  
      BackStyle       =   0  'Transparent 
      Caption         =   "性别:" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   10.5 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   360 
      TabIndex        =   1 
      Top             =   2160 
      Width           =   1095 
   End 
   Begin VB.Label Label1  
      BackStyle       =   0  'Transparent 
      Caption         =   "班级:" 
      BeginProperty Font  
         Name            =   "宋体" 
         Size            =   14.25 
         Charset         =   134 
         Weight          =   700 
         Underline       =   0   'False 
         Italic          =   0   'False 
         Strikethrough   =   0   'False 
      EndProperty 
      ForeColor       =   &H0000FFFF& 
      Height          =   375 
      Left            =   360 
      TabIndex        =   0 
      Top             =   240 
      Width           =   975 
   End 
   Begin VB.Image Image1  
      Height          =   5895 
      Left            =   0 
      Picture         =   "Form1.frx":1C96 
      Stretch         =   -1  'True 
      Top             =   -120 
      Width           =   7575 

⌨️ 快捷键说明

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