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

📄 frmsalesbill.frm

📁 金算盘软件代码
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Object = "{D252F124-F62C-11D1-9ABD-444553540000}#1.0#0"; "GADATE.DLL"
Object = "{9C4B12C2-D5CE-11D1-9ABC-444553540000}#1.0#0"; "GACEDIT.DLL"
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Object = "{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0"; "FM20.DLL"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{F42BDC2B-FC9B-11D1-9ABD-444553540000}#3.4#0"; "ATLEDIT1.OCX"
Object = "{81110CCB-022B-11D3-A348-0080C89152FF}#1.3#0"; "ORAGLIST.OCX"
Begin VB.Form FrmSalesBill 
   Caption         =   "销售单"
   ClientHeight    =   6735
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   9480
   ClipControls    =   0   'False
   Icon            =   "FrmSalesBill.frx":0000
   KeyPreview      =   -1  'True
   LinkTopic       =   "Form1"
   MDIChild        =   -1  'True
   ScaleHeight     =   6735
   ScaleWidth      =   9480
   Begin VB.CheckBox chkPrint 
      Caption         =   "现金结算(&Y)"
      Height          =   210
      Index           =   3
      Left            =   8190
      TabIndex        =   51
      TabStop         =   0   'False
      Top             =   390
      Visible         =   0   'False
      Width           =   1283
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   15
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   50
      TabStop         =   0   'False
      Tag             =   "1013"
      Top             =   5880
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   16
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   49
      TabStop         =   0   'False
      Tag             =   "1012"
      Top             =   6240
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "发票核销"
      Height          =   350
      Index           =   14
      Left            =   8220
      TabIndex        =   48
      TabStop         =   0   'False
      Top             =   5520
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.PictureBox QuanInput 
      Appearance      =   0  'Flat
      BackColor       =   &H80000005&
      ForeColor       =   &H80000008&
      Height          =   345
      Left            =   6090
      ScaleHeight     =   315
      ScaleWidth      =   1065
      TabIndex        =   47
      Top             =   960
      Visible         =   0   'False
      Width           =   1095
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "应收核销"
      Height          =   350
      Index           =   13
      Left            =   8220
      TabIndex        =   17
      TabStop         =   0   'False
      Top             =   5160
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "选择单据"
      Height          =   350
      Index           =   11
      Left            =   8220
      TabIndex        =   15
      TabStop         =   0   'False
      Top             =   4440
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "计算底稿"
      Height          =   350
      Index           =   12
      Left            =   8220
      TabIndex        =   16
      TabStop         =   0   'False
      Top             =   4800
      Visible         =   0   'False
      Width           =   1215
   End
   Begin ListRefer.ListText refInput 
      Height          =   285
      Index           =   0
      Left            =   3450
      TabIndex        =   33
      TabStop         =   0   'False
      Top             =   1890
      Visible         =   0   'False
      Width           =   735
      _ExtentX        =   1296
      _ExtentY        =   503
      CodeSort        =   -1  'True
      BackColor       =   -2147483643
      RMenu           =   "1"
      BorderStyle     =   0
      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 VB.CommandButton cmdButton 
      Caption         =   "工程费用"
      Height          =   350
      Index           =   10
      Left            =   8220
      TabIndex        =   14
      TabStop         =   0   'False
      Top             =   4100
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CheckBox chkPrint 
      Caption         =   "开票标志(&N)"
      Height          =   210
      Index           =   2
      Left            =   8190
      TabIndex        =   3
      TabStop         =   0   'False
      Top             =   135
      Visible         =   0   'False
      Width           =   1283
   End
   Begin VB.ComboBox cmbInput 
      Appearance      =   0  'Flat
      Height          =   300
      ItemData        =   "FrmSalesBill.frx":000C
      Left            =   1800
      List            =   "FrmSalesBill.frx":000E
      TabIndex        =   32
      TabStop         =   0   'False
      Top             =   1950
      Visible         =   0   'False
      Width           =   765
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "验收入库"
      Height          =   350
      Index           =   9
      Left            =   8220
      TabIndex        =   13
      TabStop         =   0   'False
      Top             =   3745
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "关联凭证"
      Height          =   350
      Index           =   8
      Left            =   8220
      TabIndex        =   12
      TabStop         =   0   'False
      Top             =   3390
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "冲销单据"
      Height          =   350
      Index           =   6
      Left            =   8220
      TabIndex        =   10
      TabStop         =   0   'False
      Top             =   2680
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "付款资料"
      Height          =   350
      Index           =   7
      Left            =   8220
      TabIndex        =   11
      TabStop         =   0   'False
      Top             =   3035
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   5
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   9
      TabStop         =   0   'False
      Tag             =   "1002"
      Top             =   2290
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   4
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   8
      TabStop         =   0   'False
      Tag             =   "1001"
      ToolTipText     =   "Ctrl+Enter"
      Top             =   1935
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   3
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   7
      TabStop         =   0   'False
      Tag             =   "1008"
      Top             =   1545
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   2
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   6
      TabStop         =   0   'False
      Tag             =   "1007"
      Top             =   1190
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   1
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   5
      TabStop         =   0   'False
      Tag             =   "1003"
      ToolTipText     =   "Ctrl+PageUp"
      Top             =   835
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   0
      Left            =   8220
      Style           =   1  'Graphical
      TabIndex        =   4
      TabStop         =   0   'False
      Tag             =   "1004"
      ToolTipText     =   "Ctrl+PageDown"
      Top             =   480
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin AtlEdit.TEdit txtInput 
      Height          =   255
      Left            =   1800
      TabIndex        =   31
      TabStop         =   0   'False
      Top             =   540
      Visible         =   0   'False
      Width           =   765
      _ExtentX        =   1349
      _ExtentY        =   450
      maxchar         =   40
      RBmenu          =   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
      Appearance      =   0
      BorderStyle     =   0
   End
   Begin VB.CheckBox chkPrint 
      Caption         =   "待打印(&P)"
      Height          =   210
      Index           =   0
      Left            =   8250
      TabIndex        =   18
      TabStop         =   0   'False
      Top             =   5985
      Visible         =   0   'False
      Width           =   1103
   End
   Begin VB.CheckBox chkPrint 
      Caption         =   "作废(&V)"
      Height          =   210
      Index           =   1
      Left            =   8250
      TabIndex        =   19
      TabStop         =   0   'False
      Top             =   6240
      Visible         =   0   'False
      Width           =   923
   End
   Begin MSFlexGridLib.MSFlexGrid grdCol 
      Height          =   2310
      Left            =   60
      TabIndex        =   20
      TabStop         =   0   'False
      Top             =   2160
      Visible         =   0   'False
      Width           =   7755
      _ExtentX        =   13679
      _ExtentY        =   4075
      _Version        =   393216
      Cols            =   37
      FixedCols       =   2
      RowHeightMin    =   275
      BackColorFixed  =   -2147483643
      ForeColorFixed  =   -2147483640
      BackColorSel    =   -2147483643
      BackColorBkg    =   -2147483643
      GridColor       =   -2147483643
      GridColorFixed  =   -2147483643
      Redraw          =   0   'False
      AllowBigSelection=   0   'False
      ScrollTrack     =   -1  'True
      FocusRect       =   0
      HighLight       =   0

⌨️ 快捷键说明

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