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

📄 frmbuild.frm

📁 VB税控的源代码 主要用于地方税务局的税控引用 有完整的控件和代码
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Object = "{D9347025-9612-11D1-9D75-00C04FCC8CDC}#1.0#0"; "MSBCODE9.OCX"
Begin VB.Form frmBuild 
   BorderStyle     =   4  'Fixed ToolWindow
   Caption         =   "广东省惠州市建筑业发票"
   ClientHeight    =   6900
   ClientLeft      =   45
   ClientTop       =   270
   ClientWidth     =   9270
   BeginProperty Font 
      Name            =   "宋体"
      Size            =   9
      Charset         =   134
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   6900
   ScaleWidth      =   9270
   ShowInTaskbar   =   0   'False
   StartUpPosition =   2  'CenterScreen
   Begin VB.CheckBox chkDial 
      Caption         =   "拨号界面"
      Height          =   240
      Left            =   210
      TabIndex        =   65
      Top             =   6510
      Value           =   1  'Checked
      Visible         =   0   'False
      Width           =   1035
   End
   Begin VB.CommandButton cmdUpdatePwd 
      Caption         =   "修改开票密码(&U)"
      Height          =   375
      Left            =   4440
      TabIndex        =   85
      Top             =   6330
      Width           =   1515
   End
   Begin VB.TextBox txtPWD 
      Appearance      =   0  'Flat
      Enabled         =   0   'False
      Height          =   315
      IMEMode         =   3  'DISABLE
      Left            =   7830
      PasswordChar    =   "*"
      TabIndex        =   84
      Top             =   5370
      Width           =   1155
   End
   Begin VB.TextBox txtDialCode 
      Height          =   270
      Left            =   2940
      TabIndex        =   66
      Top             =   6360
      Width           =   375
   End
   Begin VB.CommandButton cmdDial 
      Caption         =   "拨号(&D)"
      Height          =   375
      Left            =   3390
      TabIndex        =   67
      Top             =   6330
      Width           =   915
   End
   Begin VB.CommandButton cmdSave 
      Caption         =   "保存(&S)"
      Height          =   375
      Left            =   6060
      TabIndex        =   68
      Top             =   6330
      Width           =   945
   End
   Begin VB.CheckBox chkTest 
      Caption         =   "打印测试"
      Height          =   210
      Left            =   210
      TabIndex        =   64
      Top             =   6210
      Width           =   1035
   End
   Begin VB.PictureBox picBarCode 
      AutoSize        =   -1  'True
      Height          =   525
      Left            =   0
      ScaleHeight     =   465
      ScaleWidth      =   75
      TabIndex        =   72
      Top             =   6120
      Visible         =   0   'False
      Width           =   135
   End
   Begin VB.CommandButton cmdOpenCheque 
      Caption         =   "开票(&O)"
      Height          =   375
      Left            =   7110
      TabIndex        =   69
      Top             =   6330
      Width           =   945
   End
   Begin VB.CommandButton cmdExit 
      Cancel          =   -1  'True
      Caption         =   "退出(&E)"
      Height          =   375
      Left            =   8160
      TabIndex        =   70
      Top             =   6330
      Width           =   945
   End
   Begin VB.Frame fraBuild 
      Height          =   5985
      Left            =   180
      TabIndex        =   1
      Top             =   120
      Width           =   8925
      Begin VB.PictureBox Picture1 
         Appearance      =   0  'Flat
         BackColor       =   &H8000000E&
         ForeColor       =   &H80000008&
         Height          =   465
         Left            =   900
         ScaleHeight     =   29
         ScaleMode       =   3  'Pixel
         ScaleWidth      =   305
         TabIndex        =   87
         Top             =   4560
         Width           =   4605
         Begin VB.PictureBox picImg 
            Appearance      =   0  'Flat
            BackColor       =   &H80000005&
            BorderStyle     =   0  'None
            ForeColor       =   &H80000008&
            Height          =   615
            Index           =   10
            Left            =   4140
            ScaleHeight     =   615
            ScaleWidth      =   405
            TabIndex        =   108
            Top             =   -120
            Width           =   405
            Begin VB.Image img9 
               Height          =   300
               Index           =   109
               Left            =   0
               Picture         =   "frmBuild.frx":0000
               Top             =   150
               Visible         =   0   'False
               Width           =   240
            End
            Begin VB.Image img9 
               Height          =   345
               Index           =   108
               Left            =   0
               Picture         =   "frmBuild.frx":0404
               Top             =   150
               Visible         =   0   'False
               Width           =   210
            End
            Begin VB.Image img9 
               Height          =   330
               Index           =   107
               Left            =   0
               Picture         =   "frmBuild.frx":083C
               Top             =   150
               Visible         =   0   'False
               Width           =   195
            End
            Begin VB.Image img9 
               Height          =   285
               Index           =   106
               Left            =   0
               Picture         =   "frmBuild.frx":0BF0
               Top             =   150
               Visible         =   0   'False
               Width           =   165
            End
            Begin VB.Image img9 
               Height          =   300
               Index           =   105
               Left            =   0
               Picture         =   "frmBuild.frx":0EE0
               Top             =   150
               Visible         =   0   'False
               Width           =   225
            End
            Begin VB.Image img9 
               Height          =   315
               Index           =   104
               Left            =   0
               Picture         =   "frmBuild.frx":12E4
               Top             =   150
               Visible         =   0   'False
               Width           =   225
            End
            Begin VB.Image img9 
               Height          =   315
               Index           =   103
               Left            =   0
               Picture         =   "frmBuild.frx":1718
               Top             =   150
               Visible         =   0   'False
               Width           =   195
            End
            Begin VB.Image img9 
               Height          =   405
               Index           =   102
               Left            =   0
               Picture         =   "frmBuild.frx":1AA4
               Stretch         =   -1  'True
               Top             =   150
               Visible         =   0   'False
               Width           =   255
            End
            Begin VB.Image img9 
               Height          =   360
               Index           =   101
               Left            =   0
               Picture         =   "frmBuild.frx":1FF8
               Top             =   150
               Visible         =   0   'False
               Width           =   180
            End
            Begin VB.Label lbl9 
               BackColor       =   &H8000000E&
               BackStyle       =   0  'Transparent
               Caption         =   "仟"
               Height          =   225
               Index           =   10
               Left            =   240
               TabIndex        =   109
               Top             =   240
               Visible         =   0   'False
               Width           =   165
            End
            Begin VB.Image img9 
               Height          =   330
               Index           =   100
               Left            =   0
               Picture         =   "frmBuild.frx":239C
               Top             =   150
               Visible         =   0   'False
               Width           =   240
            End
         End
         Begin VB.PictureBox picImg 
            Appearance      =   0  'Flat
            BackColor       =   &H80000005&
            BorderStyle     =   0  'None
            ForeColor       =   &H80000008&
            Height          =   615
            Index           =   9
            Left            =   3750
            ScaleHeight     =   615
            ScaleWidth      =   405
            TabIndex        =   106
            Top             =   -120
            Width           =   405
            Begin VB.Image img9 
               Height          =   300
               Index           =   99
               Left            =   0
               Picture         =   "frmBuild.frx":2800
               Top             =   150
               Visible         =   0   'False
               Width           =   240
            End
            Begin VB.Image img9 
               Height          =   345
               Index           =   98
               Left            =   0
               Picture         =   "frmBuild.frx":2C04
               Top             =   150
               Visible         =   0   'False
               Width           =   210
            End
            Begin VB.Image img9 
               Height          =   330
               Index           =   97
               Left            =   0
               Picture         =   "frmBuild.frx":303C
               Top             =   150
               Visible         =   0   'False
               Width           =   195
            End
            Begin VB.Image img9 
               Height          =   285
               Index           =   96
               Left            =   0
               Picture         =   "frmBuild.frx":33F0
               Top             =   150
               Visible         =   0   'False
               Width           =   165
            End
            Begin VB.Image img9 
               Height          =   300
               Index           =   95
               Left            =   0
               Picture         =   "frmBuild.frx":36E0
               Top             =   150
               Visible         =   0   'False
               Width           =   225
            End
            Begin VB.Image img9 
               Height          =   315
               Index           =   94
               Left            =   0
               Picture         =   "frmBuild.frx":3AE4
               Top             =   150
               Visible         =   0   'False
               Width           =   225
            End
            Begin VB.Image img9 
               Height          =   315
               Index           =   93
               Left            =   0
               Picture         =   "frmBuild.frx":3F18
               Top             =   150
               Visible         =   0   'False
               Width           =   195
            End
            Begin VB.Image img9 
               Height          =   405
               Index           =   92
               Left            =   0
               Picture         =   "frmBuild.frx":42A4
               Stretch         =   -1  'True
               Top             =   150
               Visible         =   0   'False
               Width           =   255
            End
            Begin VB.Image img9 
               Height          =   360
               Index           =   91
               Left            =   0
               Picture         =   "frmBuild.frx":47F8
               Top             =   150
               Visible         =   0   'False
               Width           =   180
            End
            Begin VB.Label lbl9 
               BackColor       =   &H8000000E&
               BackStyle       =   0  'Transparent
               Caption         =   "仟"
               Height          =   225
               Index           =   9
               Left            =   240
               TabIndex        =   107
               Top             =   240

⌨️ 快捷键说明

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