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

📄 frmtime.frm

📁 智能门锁的程序,用于控制门锁发卡程序,是科布尔的
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Begin VB.Form FrmOutTime 
   Caption         =   "发行时钟卡"
   ClientHeight    =   3390
   ClientLeft      =   1680
   ClientTop       =   3330
   ClientWidth     =   6315
   LinkTopic       =   "Form1"
   ScaleHeight     =   3390
   ScaleWidth      =   6315
   Begin VB.PictureBox Picture1 
      BackColor       =   &H00E0E0E0&
      Height          =   375
      Index           =   6
      Left            =   1320
      ScaleHeight     =   315
      ScaleWidth      =   1635
      TabIndex        =   25
      Top             =   2400
      Width           =   1695
      Begin VB.TextBox TxtMonth 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   1
         Left            =   720
         MaxLength       =   2
         TabIndex        =   28
         Top             =   20
         Width           =   255
      End
      Begin VB.TextBox TxtYear 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   1
         Left            =   40
         MaxLength       =   4
         TabIndex        =   27
         Top             =   20
         Width           =   435
      End
      Begin VB.TextBox TxtDay 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   1
         Left            =   1200
         MaxLength       =   2
         TabIndex        =   26
         Top             =   20
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "日"
         Height          =   375
         Index           =   15
         Left            =   1440
         TabIndex        =   31
         Top             =   40
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "年"
         Height          =   375
         Index           =   14
         Left            =   480
         TabIndex        =   30
         Top             =   40
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "月"
         Height          =   375
         Index           =   13
         Left            =   960
         TabIndex        =   29
         Top             =   40
         Width           =   255
      End
   End
   Begin VB.PictureBox Picture1 
      BackColor       =   &H00E0E0E0&
      Enabled         =   0   'False
      Height          =   375
      Index           =   7
      Left            =   1320
      ScaleHeight     =   315
      ScaleWidth      =   1635
      TabIndex        =   18
      Top             =   1800
      Width           =   1695
      Begin VB.TextBox TxtDay 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   0
         Left            =   1200
         MaxLength       =   2
         TabIndex        =   21
         Top             =   20
         Width           =   255
      End
      Begin VB.TextBox TxtYear 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   0
         Left            =   40
         MaxLength       =   4
         TabIndex        =   20
         Top             =   0
         Width           =   435
      End
      Begin VB.TextBox TxtMonth 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   0
         Left            =   720
         MaxLength       =   2
         TabIndex        =   19
         Top             =   20
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "月"
         Height          =   375
         Index           =   18
         Left            =   960
         TabIndex        =   24
         Top             =   40
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "年"
         Height          =   375
         Index           =   17
         Left            =   480
         TabIndex        =   23
         Top             =   40
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "日"
         Height          =   375
         Index           =   16
         Left            =   1440
         TabIndex        =   22
         Top             =   40
         Width           =   255
      End
   End
   Begin VB.PictureBox Picture1 
      BackColor       =   &H00E0E0E0&
      Height          =   375
      Index           =   8
      Left            =   3480
      ScaleHeight     =   315
      ScaleWidth      =   1155
      TabIndex        =   12
      Top             =   2400
      Width           =   1215
      Begin VB.TextBox TxtMinute1 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Left            =   600
         MaxLength       =   2
         TabIndex        =   15
         Top             =   20
         Width           =   320
      End
      Begin VB.TextBox TxtHour1 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Left            =   40
         MaxLength       =   2
         TabIndex        =   14
         Top             =   20
         Width           =   320
      End
      Begin VB.TextBox TxtSecond1 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Left            =   1320
         MaxLength       =   2
         TabIndex        =   13
         Top             =   120
         Width           =   320
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "时"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   12
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Index           =   19
         Left            =   360
         TabIndex        =   17
         Top             =   40
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "分"
         Height          =   375
         Index           =   10
         Left            =   960
         TabIndex        =   16
         Top             =   40
         Width           =   255
      End
   End
   Begin VB.PictureBox Picture1 
      BackColor       =   &H00E0E0E0&
      Enabled         =   0   'False
      Height          =   375
      Index           =   9
      Left            =   3480
      ScaleHeight     =   315
      ScaleWidth      =   1155
      TabIndex        =   6
      Top             =   1800
      Width           =   1215
      Begin VB.TextBox TxtSecond 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Index           =   6
         Left            =   1560
         MaxLength       =   2
         TabIndex        =   9
         Top             =   20
         Width           =   320
      End
      Begin VB.TextBox TxtHour 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Left            =   40
         MaxLength       =   2
         TabIndex        =   8
         Top             =   20
         Width           =   320
      End
      Begin VB.TextBox TxtMinute 
         BackColor       =   &H00E0E0E0&
         BorderStyle     =   0  'None
         Height          =   255
         Left            =   600
         MaxLength       =   2
         TabIndex        =   7
         Top             =   20
         Width           =   320
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "分"
         Height          =   375
         Index           =   21
         Left            =   960
         TabIndex        =   11
         Top             =   40
         Width           =   255
      End
      Begin VB.Label Label1 
         BackColor       =   &H00E0E0E0&
         Caption         =   "时"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   12
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Index           =   20
         Left            =   360
         TabIndex        =   10
         Top             =   40
         Width           =   255
      End
   End
   Begin VB.PictureBox PicMSG 
      BackColor       =   &H00C0C0C0&
      BorderStyle     =   0  'None
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   9.75
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H000000FF&
      Height          =   375
      Left            =   240
      ScaleHeight     =   375
      ScaleWidth      =   5535
      TabIndex        =   5
      Top             =   2880
      Width           =   5532
   End
   Begin VB.Timer Timer1 
      Interval        =   800
      Left            =   240
      Top             =   960
   End
   Begin VB.CommandButton CmdLoss 
      Caption         =   "挂失"
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   9.75
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   375
      Left            =   3720
      TabIndex        =   3
      Top             =   1200
      Width           =   735
   End
   Begin VB.CommandButton CmdCancel 
      Caption         =   "取消"
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   9.75
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   495
      Left            =   4800
      TabIndex        =   2
      Top             =   1920
      Width           =   1212
   End
   Begin VB.CommandButton CmdAccept 
      Caption         =   "发行"
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   9.75
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   495
      Left            =   4800
      TabIndex        =   1
      Top             =   1200
      Width           =   1212
   End
   Begin VB.TextBox TxtICNumber 
      Enabled         =   0   'False
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   10.5

⌨️ 快捷键说明

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