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

📄 串口.frm

📁 一个简单的RF卡读卡号的VB程序
💻 FRM
📖 第 1 页 / 共 3 页
字号:
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1 
   AutoRedraw      =   -1  'True
   Caption         =   " "
   ClientHeight    =   8595
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   11925
   DrawMode        =   0  'Blackness
   FillColor       =   &H00E0E0E0&
   ForeColor       =   &H00E0E0E0&
   LinkTopic       =   "Form1"
   ScaleHeight     =   8595
   ScaleWidth      =   11925
   StartUpPosition =   3  'Windows Default
   Begin VB.Frame Frame6 
      BackColor       =   &H00E0E0E0&
      Caption         =   "板选信号"
      BeginProperty Font 
         Name            =   "楷体_GB2312"
         Size            =   9
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FF0000&
      Height          =   1455
      Left            =   0
      TabIndex        =   41
      Top             =   2880
      Width           =   11895
      Begin VB.OptionButton Option1 
         BackColor       =   &H00FF0000&
         ForeColor       =   &H0000FF00&
         Height          =   255
         Left            =   360
         MaskColor       =   &H000000FF&
         TabIndex        =   62
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option11 
         Caption         =   "Option11"
         Height          =   255
         Left            =   6480
         TabIndex        =   61
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option10 
         Caption         =   "Option10"
         Height          =   255
         Left            =   5760
         TabIndex        =   60
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option9 
         Caption         =   "Option9"
         Height          =   255
         Left            =   5160
         TabIndex        =   59
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option8 
         Caption         =   "Option8"
         Height          =   255
         Left            =   4560
         TabIndex        =   58
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option7 
         Caption         =   "Option7"
         Height          =   255
         Left            =   3960
         TabIndex        =   57
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option6 
         Caption         =   "Option6"
         Height          =   255
         Left            =   3360
         TabIndex        =   56
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option5 
         Caption         =   "Option5"
         Height          =   255
         Left            =   2760
         TabIndex        =   55
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option4 
         Caption         =   "Option4"
         Height          =   255
         Left            =   2160
         TabIndex        =   54
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option3 
         Caption         =   "Option3"
         Height          =   255
         Left            =   1560
         TabIndex        =   53
         Top             =   720
         Width           =   255
      End
      Begin VB.OptionButton Option2 
         Caption         =   "Option2"
         Height          =   255
         Left            =   960
         TabIndex        =   52
         Top             =   720
         Width           =   255
      End
      Begin VB.Label Label21 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 1"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Index           =   0
         Left            =   360
         TabIndex        =   63
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label31 
         BackColor       =   &H00E0E0E0&
         Caption         =   "11"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   6480
         TabIndex        =   51
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label30 
         BackColor       =   &H00E0E0E0&
         Caption         =   "10"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   5760
         TabIndex        =   50
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label29 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 9"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   5160
         TabIndex        =   49
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label28 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 8"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   4560
         TabIndex        =   48
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label27 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 7"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   3960
         TabIndex        =   47
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label26 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 6"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   3360
         TabIndex        =   46
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label25 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 5"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   2760
         TabIndex        =   45
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label24 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 4"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   2160
         TabIndex        =   44
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label23 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 3"
         ForeColor       =   &H00FF0000&
         Height          =   375
         Left            =   1560
         TabIndex        =   43
         Top             =   360
         Width           =   255
      End
      Begin VB.Label Label22 
         BackColor       =   &H00E0E0E0&
         Caption         =   " 2"
         ForeColor       =   &H00FF0000&
         Height          =   495
         Left            =   960
         TabIndex        =   42
         Top             =   360
         Width           =   255
      End
   End
   Begin VB.Frame Frame5 
      BackColor       =   &H00E0E0E0&
      Caption         =   "逆程数据"
      BeginProperty Font 
         Name            =   "楷体_GB2312"
         Size            =   10.5
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FF0000&
      Height          =   1455
      Left            =   0
      TabIndex        =   24
      Top             =   1320
      Width           =   11895
      Begin VB.CommandButton Command6 
         Caption         =   "发 送"
         BeginProperty Font 
            Name            =   "仿宋_GB2312"
            Size            =   14.25
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   495
         Left            =   9720
         TabIndex        =   40
         Top             =   720
         Width           =   975
      End
      Begin VB.TextBox Text8 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   8040
         TabIndex        =   38
         Top             =   720
         Width           =   855
      End
      Begin VB.TextBox Text7 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   6720
         TabIndex        =   36
         Top             =   720
         Width           =   855
      End
      Begin VB.TextBox Text6 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   5400
         TabIndex        =   34
         Top             =   720
         Width           =   855
      End
      Begin VB.TextBox Text5 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   4080
         TabIndex        =   32
         Top             =   720
         Width           =   855
      End
      Begin VB.TextBox Text4 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   2760
         TabIndex        =   30
         Top             =   720
         Width           =   855
      End
      Begin VB.TextBox Text3 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   1440
         TabIndex        =   28
         Top             =   720
         Width           =   855
      End
      Begin VB.TextBox Text1 
         Alignment       =   2  'Center
         Height          =   375
         Left            =   120
         TabIndex        =   26
         Top             =   720
         Width           =   855
      End
      Begin VB.Shape Shape1 
         FillColor       =   &H000000FF&
         FillStyle       =   0  'Solid
         Height          =   495
         Index           =   7
         Left            =   11040
         Shape           =   2  'Oval
         Top             =   720
         Width           =   495
      End
      Begin VB.Label Label20 
         BackColor       =   &H00E0E0E0&
         Caption         =   "毫秒"
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   9000
         TabIndex        =   39
         Top             =   840
         Width           =   375
      End
      Begin VB.Label Label19 
         BackColor       =   &H00E0E0E0&
         Caption         =   "秒"
         ForeColor       =   &H000000FF&
         Height          =   375
         Left            =   7680
         TabIndex        =   37
         Top             =   840
         Width           =   375
      End
      Begin VB.Label Label18 
         BackColor       =   &H00E0E0E0&
         Caption         =   "分"
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   6360
         TabIndex        =   35
         Top             =   840
         Width           =   375
      End
      Begin VB.Label Label17 
         BackColor       =   &H00E0E0E0&
         Caption         =   "时"
         ForeColor       =   &H000000FF&
         Height          =   375
         Left            =   5040
         TabIndex        =   33
         Top             =   840
         Width           =   375
      End
      Begin VB.Label Label16 
         BackColor       =   &H00E0E0E0&
         Caption         =   "日"
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   3720
         TabIndex        =   31
         Top             =   840
         Width           =   255
      End
      Begin VB.Label Label15 
         BackColor       =   &H00E0E0E0&
         Caption         =   "月"
         ForeColor       =   &H000000FF&
         Height          =   375
         Left            =   2400
         TabIndex        =   29
         Top             =   840
         Width           =   375
      End
      Begin VB.Label Label14 
         BackColor       =   &H00E0E0E0&
         Caption         =   "年"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   1080
         TabIndex        =   27
         Top             =   840
         Width           =   255
      End
      Begin VB.Label Label13 
         BackColor       =   &H00E0E0E0&

⌨️ 快捷键说明

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