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

📄 cg_yl_shd.frm

📁 基于SQL2000的企业管理MRPII,包含进销存,财务,报关等组件,VB6开发,带文档说明.
💻 FRM
📖 第 1 页 / 共 4 页
字号:
VERSION 5.00
Object = "{A964BDA3-3E93-11CF-9A0F-9E6261DACD1C}#3.0#0"; "Resize32.ocx"
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{0D6234D1-DBA2-11D1-B5DF-0060976089D0}#6.0#0"; "TODG6.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form CG_YL_shd 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "采购质检(收货单)"
   ClientHeight    =   7335
   ClientLeft      =   1635
   ClientTop       =   1485
   ClientWidth     =   10875
   Icon            =   "CG_YL_shd.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   Moveable        =   0   'False
   ScaleHeight     =   7335
   ScaleWidth      =   10875
   Begin TrueOleDBGrid60.TDBGrid TDBGrid3 
      Bindings        =   "CG_YL_shd.frx":1E72
      Height          =   6735
      Left            =   0
      OleObjectBlob   =   "CG_YL_shd.frx":1E8D
      TabIndex        =   40
      Top             =   0
      Width           =   2775
   End
   Begin TrueOleDBGrid60.TDBGrid TDBGrid2 
      Bindings        =   "CG_YL_shd.frx":4D1C
      Height          =   1905
      Left            =   2820
      OleObjectBlob   =   "CG_YL_shd.frx":4D34
      TabIndex        =   42
      Top             =   30
      Visible         =   0   'False
      Width           =   7995
   End
   Begin VB.Frame Frame5 
      Height          =   525
      Left            =   0
      TabIndex        =   37
      Top             =   6750
      Width           =   2775
      Begin VB.CheckBox Check1 
         Caption         =   "取日"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   1890
         TabIndex        =   38
         Top             =   210
         Width           =   795
      End
      Begin MSComCtl2.DTPicker DTPicker1 
         Height          =   300
         Left            =   30
         TabIndex        =   39
         Top             =   180
         Width           =   1815
         _ExtentX        =   3201
         _ExtentY        =   529
         _Version        =   393216
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9.75
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         CalendarForeColor=   0
         CalendarTitleForeColor=   0
         CalendarTrailingForeColor=   4194304
         Format          =   23724032
         CurrentDate     =   37712
      End
   End
   Begin ResizeLibCtl.ReSize ReSize1 
      Left            =   1110
      Top             =   4650
      _Version        =   196608
      _ExtentX        =   741
      _ExtentY        =   741
      _StockProps     =   64
      Enabled         =   -1  'True
      Enabled         =   -1  'True
      FormMinWidth    =   0
      FormMinHeight   =   0
      FormDesignHeight=   7335
      FormDesignWidth =   10875
   End
   Begin VB.Frame Frame1 
      Height          =   615
      Left            =   2820
      TabIndex        =   24
      Top             =   5850
      Width           =   7995
      Begin VB.TextBox T_Sh 
         BackColor       =   &H80000004&
         BorderStyle     =   0  'None
         DataField       =   "sh"
         BeginProperty DataFormat 
            Type            =   0
            Format          =   "0.00"
            HaveTrueFalseNull=   0
            FirstDayOfWeek  =   0
            FirstWeekOfYear =   0
            LCID            =   2052
            SubFormatType   =   0
         EndProperty
         DataSource      =   "adoprimaryrs"
         BeginProperty Font 
            Name            =   "隶书"
            Size            =   14.25
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H000000FF&
         Height          =   300
         Left            =   6810
         Locked          =   -1  'True
         TabIndex        =   45
         Top             =   240
         Width           =   735
      End
      Begin VB.TextBox Text1 
         DataField       =   "zjsl"
         DataSource      =   "adoprimaryrs"
         BeginProperty Font 
            Name            =   "MS Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Index           =   7
         Left            =   960
         Locked          =   -1  'True
         TabIndex        =   10
         Top             =   240
         Width           =   1455
      End
      Begin VB.TextBox Text1 
         DataField       =   "zjje"
         DataSource      =   "adoprimaryrs"
         BeginProperty Font 
            Name            =   "MS Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Index           =   8
         Left            =   4320
         Locked          =   -1  'True
         TabIndex        =   11
         Top             =   240
         Width           =   1875
      End
      Begin VB.Label Label1 
         Caption         =   "总计数量"
         Height          =   255
         Index           =   4
         Left            =   120
         TabIndex        =   26
         Top             =   270
         Width           =   1095
      End
      Begin VB.Label Label1 
         Caption         =   "总计金额"
         Height          =   255
         Index           =   5
         Left            =   3480
         TabIndex        =   25
         Top             =   270
         Width           =   1095
      End
   End
   Begin VB.Frame Frame2 
      Height          =   855
      Left            =   2805
      TabIndex        =   12
      Top             =   6420
      Width           =   8025
      Begin VB.CommandButton CmD_SH 
         Caption         =   "审核"
         Height          =   610
         Left            =   2280
         Picture         =   "CG_YL_shd.frx":DFBF
         Style           =   1  'Graphical
         TabIndex        =   46
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmd_FinD 
         Caption         =   "查询"
         Height          =   610
         Left            =   2913
         Picture         =   "CG_YL_shd.frx":E0C1
         Style           =   1  'Graphical
         TabIndex        =   41
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmdadd 
         Caption         =   "添加"
         Height          =   610
         Left            =   4179
         Picture         =   "CG_YL_shd.frx":E693
         Style           =   1  'Graphical
         TabIndex        =   23
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmdprint 
         Caption         =   "打印"
         Height          =   610
         Left            =   3546
         Picture         =   "CG_YL_shd.frx":ECB5
         Style           =   1  'Graphical
         TabIndex        =   22
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton cmdmd 
         Caption         =   "后端"
         Height          =   610
         Left            =   1620
         Picture         =   "CG_YL_shd.frx":F287
         Style           =   1  'Graphical
         TabIndex        =   21
         Top             =   180
         Width           =   495
      End
      Begin VB.CommandButton cmdnext 
         Caption         =   "向后"
         Height          =   610
         Left            =   1095
         Picture         =   "CG_YL_shd.frx":F859
         Style           =   1  'Graphical
         TabIndex        =   20
         Top             =   180
         Width           =   495
      End
      Begin VB.CommandButton cmdxq 
         Caption         =   "向前"
         Height          =   610
         Left            =   585
         Picture         =   "CG_YL_shd.frx":FE2B
         Style           =   1  'Graphical
         TabIndex        =   19
         Top             =   180
         Width           =   495
      End
      Begin VB.CommandButton cmdqd 
         Caption         =   "前端"
         Height          =   610
         Left            =   60
         Picture         =   "CG_YL_shd.frx":103FD
         Style           =   1  'Graphical
         TabIndex        =   18
         Top             =   180
         Width           =   495
      End
      Begin VB.CommandButton CmdOK 
         Caption         =   "确认"
         Enabled         =   0   'False
         Height          =   610
         Left            =   6078
         Picture         =   "CG_YL_shd.frx":109CF
         Style           =   1  'Graphical
         TabIndex        =   17
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmddelete 
         Caption         =   "删除"
         Height          =   610
         Left            =   4812
         Picture         =   "CG_YL_shd.frx":10AC1
         Style           =   1  'Graphical
         TabIndex        =   16
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmdedit 
         Caption         =   "编辑"
         Height          =   610
         Left            =   5445
         Picture         =   "CG_YL_shd.frx":11093
         Style           =   1  'Graphical
         TabIndex        =   15
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmdcancel 
         Caption         =   "取消"
         Enabled         =   0   'False
         Height          =   610
         Left            =   6711
         Picture         =   "CG_YL_shd.frx":11665
         Style           =   1  'Graphical
         TabIndex        =   14
         Top             =   180
         Width           =   615
      End
      Begin VB.CommandButton Cmdreturn 
         Caption         =   "返回"
         Height          =   610
         Left            =   7350
         Picture         =   "CG_YL_shd.frx":11C37
         Style           =   1  'Graphical
         TabIndex        =   13
         Top             =   180
         Width           =   615
      End
   End
   Begin TrueOleDBGrid60.TDBGrid TDBGrid1 
      Bindings        =   "CG_YL_shd.frx":11EBA
      Height          =   3915
      Left            =   2805
      OleObjectBlob   =   "CG_YL_shd.frx":11EDB
      TabIndex        =   27
      Top             =   1950
      Width           =   7965
   End
   Begin MSAdodcLib.Adodc adoprimaryrs 
      Height          =   330
      Left            =   4650
      Top             =   3645
      Width           =   3495
      _ExtentX        =   6165
      _ExtentY        =   582
      ConnectMode     =   0
      CursorLocation  =   3
      IsolationLevel  =   -1
      ConnectionTimeout=   15
      CommandTimeout  =   30
      CursorType      =   3
      LockType        =   3
      CommandType     =   8
      CursorOptions   =   0
      CacheSize       =   50
      MaxRecords      =   0
      BOFAction       =   0
      EOFAction       =   0
      ConnectStringType=   1
      Appearance      =   1
      BackColor       =   -2147483643

⌨️ 快捷键说明

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