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

📄 frmacount.frm

📁 本程序源码是由vb编写的
💻 FRM
📖 第 1 页 / 共 5 页
字号:
      End
      Begin 给出焦点文本框.FocusText txtEdit 
         Height          =   315
         Left            =   2910
         TabIndex        =   2
         Top             =   345
         Visible         =   0   'False
         Width           =   1875
         _ExtentX        =   3307
         _ExtentY        =   556
         Enabled         =   0   'False
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   12
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         BorderStyle     =   0
         GotBackColor    =   12648447
         GotForeColor    =   0
      End
      Begin 给出焦点文本框.FocusText txtUnitID 
         Height          =   300
         Left            =   1515
         TabIndex        =   17
         Top             =   915
         Width           =   3900
         _ExtentX        =   6879
         _ExtentY        =   529
         BackColor       =   12632256
         Enabled         =   0   'False
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         BorderStyle     =   0
         GotBackColor    =   12648447
         GotForeColor    =   16711680
         LostBackColor   =   12632256
         LostForeColor   =   16711680
         Locked          =   -1  'True
         LineOut         =   1
      End
      Begin MSComCtl2.DTPicker dpDate 
         Height          =   315
         Left            =   9945
         TabIndex        =   18
         Top             =   1335
         Width           =   1725
         _ExtentX        =   3043
         _ExtentY        =   556
         _Version        =   393216
         Enabled         =   0   'False
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Format          =   24576001
         CurrentDate     =   36942
      End
      Begin MSFlexGridLib.MSFlexGrid Grid1 
         Height          =   2955
         Left            =   105
         TabIndex        =   3
         Top             =   1755
         Width           =   5460
         _ExtentX        =   9631
         _ExtentY        =   5212
         _Version        =   393216
         BackColorSel    =   16777215
         ForeColorSel    =   8388608
         AllowBigSelection=   0   'False
         Enabled         =   -1  'True
         FocusRect       =   0
         AllowUserResizing=   1
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin 给出焦点文本框.FocusText txtFK 
         Height          =   300
         Left            =   6360
         TabIndex        =   0
         Top             =   915
         Width           =   2190
         _ExtentX        =   3863
         _ExtentY        =   529
         BackColor       =   16777215
         Enabled         =   0   'False
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         BorderStyle     =   0
         GotBackColor    =   12648447
         GotForeColor    =   8388608
         LostBackColor   =   16777215
         LostForeColor   =   32768
         TextType        =   2
         Text            =   "0"
      End
      Begin VB.Image imgSuccess 
         Height          =   900
         Left            =   7500
         Picture         =   "frmAcount.frx":27FD
         Top             =   -915
         Visible         =   0   'False
         Width           =   900
      End
      Begin VB.Image imgExcute 
         Height          =   900
         Left            =   7470
         Picture         =   "frmAcount.frx":32C5
         Top             =   -1830
         Visible         =   0   'False
         Width           =   900
      End
      Begin VB.Image imgDraft 
         Height          =   900
         Left            =   7305
         Picture         =   "frmAcount.frx":3E22
         Top             =   -3180
         Visible         =   0   'False
         Width           =   900
      End
      Begin VB.Label lbUnit 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         BeginProperty Font 
            Name            =   "MS Serif"
            Size            =   12
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H000080FF&
         Height          =   285
         Left            =   1845
         TabIndex        =   27
         Top             =   1320
         Width           =   60
      End
      Begin VB.Shape Shape1 
         Height          =   765
         Index           =   1
         Left            =   180
         Top             =   870
         Width           =   8445
      End
      Begin VB.Line Line2 
         X1              =   180
         X2              =   5610
         Y1              =   1230
         Y2              =   1230
      End
      Begin VB.Shape Shape1 
         Height          =   855
         Index           =   0
         Left            =   150
         Top             =   825
         Width           =   8535
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "专卖店名称:"
         ForeColor       =   &H00808000&
         Height          =   180
         Index           =   3
         Left            =   330
         TabIndex        =   26
         Top             =   960
         Width           =   1080
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "日期:"
         Height          =   180
         Index           =   1
         Left            =   9270
         TabIndex        =   25
         Top             =   1395
         Width           =   540
      End
      Begin VB.Label lbSheetID 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         ForeColor       =   &H00C00000&
         Height          =   180
         Left            =   1440
         TabIndex        =   24
         Top             =   390
         Width           =   90
      End
      Begin VB.Label Label2 
         AutoSize        =   -1  'True
         Caption         =   "销售编号:"
         ForeColor       =   &H00808000&
         Height          =   180
         Index           =   0
         Left            =   300
         TabIndex        =   23
         Top             =   405
         Width           =   900
      End
      Begin VB.Line Line1 
         X1              =   5610
         X2              =   5610
         Y1              =   870
         Y2              =   1635
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "付款:"
         ForeColor       =   &H00808000&
         Height          =   180
         Index           =   0
         Left            =   5715
         TabIndex        =   22
         Top             =   975
         Width           =   540
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "找零:"
         ForeColor       =   &H00808000&
         Height          =   180
         Index           =   4
         Left            =   5715
         TabIndex        =   21
         Top             =   1305
         Width           =   540
      End
      Begin VB.Label lbZL 
         Caption         =   "0"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H000000C0&
         Height          =   255
         Left            =   6390
         TabIndex        =   20
         Top             =   1305
         Width           =   2100
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "如果该产品是退货请选择:"
         ForeColor       =   &H00808000&
         Height          =   180
         Index           =   2
         Left            =   330
         TabIndex        =   19
         Top             =   1350
         Width           =   2160
      End
   End
   Begin VB.Timer timeDate 
      Interval        =   1000
      Left            =   0
      Top             =   0
   End
   Begin MSComctlLib.Toolbar tbOrder 
      Align           =   1  'Align Top
      Height          =   765
      Left            =   0
      TabIndex        =   4
      Top             =   0
      Width           =   11910
      _ExtentX        =   21008
      _ExtentY        =   1349
      ButtonWidth     =   1455
      ButtonHeight    =   1349
      AllowCustomize  =   0   'False
      Wrappable       =   0   'False
      Style           =   1
      ImageList       =   "ImageList1"
      DisabledImageList=   "ImageList1"
      HotImageList    =   "ImageList1"
      _Version        =   393216
      BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
         NumButtons      =   8
         BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "销售明细"
            Key             =   "selldetail"
            Object.ToolTipText     =   "销售明细"
            ImageIndex      =   2
         EndProperty
         BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "销售汇总"
            Key             =   "sellcount"
            Object.ToolTipText     =   "销售汇总"
            ImageIndex      =   4
         EndProperty
         BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "现金日帐"
            Key             =   "cashday"
            Object.ToolTipText     =   "现金日帐"
            ImageIndex      =   8
         EndProperty
         BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "单据打印"
            Key             =   "print"
            Object.ToolTipText     =   "单据打印"
            ImageIndex      =   10
            Style           =   5
            BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628} 
               NumButtonMenus  =   2
               BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "set"
                  Text            =   "(&C) 打印配置..."
               EndProperty
               BeginProperty ButtonMenu2 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "print"
                  Text            =   "(&P) 打印..."
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "关闭返回"
            Key             =   "return"
            Object.ToolTipText     =   "关闭返回"
            ImageIndex      =   11
         EndProperty
      EndProperty

⌨️ 快捷键说明

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