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

📄 frmreceive.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 = "{B30D79B5-7B15-11D2-9ACA-444553540000}#2.1#0"; "GACASH.OCX"
Object = "{81110CCB-022B-11D3-A348-0080C89152FF}#1.3#0"; "ORAGLIST.OCX"
Object = "{F42BDC2B-FC9B-11D1-9ABD-444553540000}#4.1#0"; "ATLEDIT.OCX"
Begin VB.Form FrmReceive 
   AutoRedraw      =   -1  'True
   Caption         =   "收款单"
   ClientHeight    =   5895
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   9495
   ClipControls    =   0   'False
   KeyPreview      =   -1  'True
   LinkTopic       =   "Form1"
   MDIChild        =   -1  'True
   ScaleHeight     =   5895
   ScaleWidth      =   9495
   Begin GACashtxt.GACashText cashInput 
      Height          =   405
      Left            =   3150
      TabIndex        =   40
      Top             =   1980
      Visible         =   0   'False
      Width           =   1185
      _ExtentX        =   2090
      _ExtentY        =   714
      ForeColor       =   -2147483630
      SelStart        =   5
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "单据冲销(&G)"
      Height          =   345
      Index           =   6
      Left            =   8160
      TabIndex        =   8
      TabStop         =   0   'False
      Top             =   1860
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.PictureBox picFooter 
      Appearance      =   0  'Flat
      BackColor       =   &H80000005&
      BorderStyle     =   0  'None
      FillStyle       =   0  'Solid
      ForeColor       =   &H80000008&
      Height          =   645
      Left            =   210
      ScaleHeight     =   645
      ScaleWidth      =   3765
      TabIndex        =   32
      TabStop         =   0   'False
      Top             =   4770
      Visible         =   0   'False
      Width           =   3765
      Begin VB.Label lblNote 
         Appearance      =   0  'Flat
         BackColor       =   &H80000005&
         ForeColor       =   &H80000008&
         Height          =   345
         Index           =   1
         Left            =   480
         TabIndex        =   35
         Top             =   300
         Visible         =   0   'False
         Width           =   255
         WordWrap        =   -1  'True
      End
      Begin VB.Label lblNote 
         Appearance      =   0  'Flat
         BackColor       =   &H80000005&
         Caption         =   "说明"
         ForeColor       =   &H80000008&
         Height          =   345
         Index           =   0
         Left            =   180
         TabIndex        =   34
         Top             =   270
         Visible         =   0   'False
         Width           =   195
      End
      Begin VB.Label lblTotal 
         Appearance      =   0  'Flat
         BackColor       =   &H80000005&
         Caption         =   "合计:"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H80000008&
         Height          =   255
         Index           =   0
         Left            =   60
         TabIndex        =   33
         Top             =   30
         Visible         =   0   'False
         Width           =   675
      End
   End
   Begin VB.CheckBox chkPrint 
      Caption         =   "作废(&V)"
      Height          =   195
      Index           =   1
      Left            =   8190
      TabIndex        =   14
      TabStop         =   0   'False
      Top             =   3900
      Visible         =   0   'False
      Width           =   1155
   End
   Begin VB.PictureBox picInput 
      Appearance      =   0  'Flat
      BackColor       =   &H80000004&
      ForeColor       =   &H80000008&
      Height          =   1560
      Left            =   4740
      ScaleHeight     =   1530
      ScaleWidth      =   3105
      TabIndex        =   16
      TabStop         =   0   'False
      Top             =   510
      Visible         =   0   'False
      Width           =   3135
      Begin VB.Image imgPicDown 
         Height          =   240
         Index           =   0
         Left            =   2820
         Picture         =   "frmReceive.frx":0000
         Top             =   0
         Width           =   255
      End
      Begin VB.Label lblInput 
         BackColor       =   &H8000000E&
         Height          =   225
         Index           =   0
         Left            =   810
         TabIndex        =   17
         Top             =   0
         Width           =   2265
      End
      Begin VB.Label lblTitle 
         Caption         =   "币    种"
         Height          =   165
         Index           =   0
         Left            =   60
         TabIndex        =   18
         Top             =   30
         Width           =   735
      End
   End
   Begin VB.CheckBox chkPrint 
      Caption         =   "待打印(&P)"
      Height          =   195
      Index           =   0
      Left            =   8160
      TabIndex        =   13
      TabStop         =   0   'False
      Top             =   3660
      Visible         =   0   'False
      Width           =   1155
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   0
      Left            =   8160
      Style           =   1  'Graphical
      TabIndex        =   2
      TabStop         =   0   'False
      Tag             =   "1004"
      ToolTipText     =   "Ctrl + PageDown"
      Top             =   390
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   1
      Left            =   8160
      Style           =   1  'Graphical
      TabIndex        =   3
      TabStop         =   0   'False
      Tag             =   "1003"
      ToolTipText     =   "Ctrl + PageUp"
      Top             =   756
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   2
      Left            =   3210
      Style           =   1  'Graphical
      TabIndex        =   4
      TabStop         =   0   'False
      Tag             =   "1007"
      Top             =   840
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   3
      Left            =   3360
      Style           =   1  'Graphical
      TabIndex        =   5
      TabStop         =   0   'False
      Tag             =   "1008"
      Top             =   1410
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   4
      Left            =   8160
      Style           =   1  'Graphical
      TabIndex        =   6
      TabStop         =   0   'False
      Tag             =   "1001"
      ToolTipText     =   "Ctrl + Enter"
      Top             =   1110
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   5
      Left            =   8160
      Style           =   1  'Graphical
      TabIndex        =   7
      TabStop         =   0   'False
      Tag             =   "1002"
      Top             =   1470
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   9
      Left            =   8130
      Style           =   1  'Graphical
      TabIndex        =   11
      TabStop         =   0   'False
      Tag             =   "1013"
      Top             =   2940
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "应收核销(&R)"
      Height          =   345
      Index           =   7
      Left            =   8130
      TabIndex        =   9
      TabStop         =   0   'False
      Top             =   2220
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Height          =   350
      Index           =   10
      Left            =   8130
      Style           =   1  'Graphical
      TabIndex        =   12
      TabStop         =   0   'False
      Tag             =   "1012"
      Top             =   3300
      UseMaskColor    =   -1  'True
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton cmdButton 
      Caption         =   "关联凭证(&Z)"
      Height          =   350
      Index           =   8
      Left            =   8130
      TabIndex        =   10
      TabStop         =   0   'False
      Top             =   2565
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.ComboBox cmbInput 
      Appearance      =   0  'Flat
      Height          =   300
      ItemData        =   "frmReceive.frx":0382
      Left            =   1740
      List            =   "frmReceive.frx":0384
      TabIndex        =   1
      TabStop         =   0   'False
      Top             =   2010
      Visible         =   0   'False
      Width           =   765
   End
   Begin ListRefer.ListText refInput 
      Height          =   225
      Index           =   0
      Left            =   1740
      TabIndex        =   0
      TabStop         =   0   'False
      Top             =   1410
      Visible         =   0   'False
      Width           =   705
      _ExtentX        =   1244
      _ExtentY        =   397
      CodeSort        =   -1  'True
      BackColor       =   -2147483643
      RMenu           =   "1"
      Appearance      =   0
      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 AtlEdit.TEdit txtInput 
      Height          =   255
      Left            =   1740
      TabIndex        =   15
      TabStop         =   0   'False
      Top             =   510
      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 MSFlexGridLib.MSFlexGrid grdCol 
      Bindings        =   "frmReceive.frx":0386
      Height          =   2310
      Left            =   180
      TabIndex        =   29

⌨️ 快捷键说明

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