frmconfirm.frm

这是一个用来打印手机三包凭证的源代码

VERSION 5.00
Begin VB.Form frmConfirm 
   BackColor       =   &H00FF00FF&
   Caption         =   "Pseronal Information Confirm"
   ClientHeight    =   6030
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   5805
   ControlBox      =   0   'False
   LinkTopic       =   "Form1"
   ScaleHeight     =   6030
   ScaleWidth      =   5805
   StartUpPosition =   2  '棵辊いァ
   Begin VB.TextBox Text1 
      BackColor       =   &H00000000&
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   72
         Charset         =   0
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0000FFFF&
      Height          =   1455
      Left            =   1200
      TabIndex        =   0
      Top             =   4080
      Width           =   3375
   End
   Begin VB.Frame fraInfoInput 
      Caption         =   "Personal HandSet Infomation Input"
      Height          =   2655
      Left            =   600
      TabIndex        =   1
      Top             =   480
      Width           =   4575
      Begin VB.TextBox txtTripChargerSN 
         BackColor       =   &H80000004&
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   14.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   615
         Left            =   1320
         MaxLength       =   13
         TabIndex        =   4
         Text            =   "Text9"
         Top             =   1680
         Width           =   2535
      End
      Begin VB.TextBox txtBattery1 
         BackColor       =   &H80000004&
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   14.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   615
         Left            =   1320
         MaxLength       =   12
         TabIndex        =   3
         Text            =   "Text10"
         Top             =   480
         Width           =   2535
      End
      Begin VB.TextBox txtBattery2 
         BackColor       =   &H80000004&
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   14.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   615
         Left            =   1320
         MaxLength       =   12
         TabIndex        =   2
         Text            =   "Text11"
         Top             =   1080
         Width           =   2535
      End
      Begin VB.Label Label8 
         Caption         =   "