fmrcin.frm

利用Visual basic 构建POS进销存源码

VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Begin VB.Form FMRCIN 
   Caption         =   "进货单处理"
   ClientHeight    =   7170
   ClientLeft      =   3375
   ClientTop       =   3105
   ClientWidth     =   9795
   LinkTopic       =   "Form1"
   ScaleHeight     =   7170
   ScaleWidth      =   9795
   StartUpPosition =   2  '屏幕中心
   Begin VB.TextBox RIGCT 
      DataField       =   "RIGCT"
      DataSource      =   "Adodc2"
      Height          =   270
      Left            =   855
      TabIndex        =   64
      Top             =   6840
      Width           =   1600
   End
   Begin VB.TextBox RIGCS 
      DataField       =   "RIGCS"
      DataSource      =   "Adodc2"
      Height          =   270
      Left            =   855
      TabIndex        =   63
      Top             =   6540
      Width           =   1600
   End
   Begin VB.TextBox RIGCN 
      DataField       =   "RIGCN"
      DataSource      =   "Adodc2"
      Height          =   270
      Left            =   855
      TabIndex        =   62
      Top             =   6240
      Width           =   1600
   End
   Begin VB.TextBox RIUNP 
      DataField       =   "RIUNP"
      DataSource      =   "Adodc2"
      Height          =   270
      Left            =   855
      TabIndex        =   61
      Top             =   5640
      Width           =   1600
   End
   Begin VB.TextBox BGENO 
      DataField       =   "BGENO"
      DataSource      =   "Adodc2"
      Height          =   270
      Left            =   855
      TabIndex        =   60
      Top             =   5340
      Width           =   1600
   End
   Begin VB.TextBox RIITM 
      DataField       =   "RIITM"
      DataSource      =   "Adodc2"
      Enabled         =   0   'False
      Height          =   270
      Left            =   855
      TabIndex        =   59
      Top             =   4980
      Width           =   1600
   End
   Begin VB.TextBox Text1 
      DataField       =   "RIENO"
      DataSource      =   "Adodc2"
      Enabled         =   0   'False
      Height          =   270
      Left            =   855
      TabIndex        =   58
      Top             =   4680
      Width           =   1600
   End
   Begin VB.CommandButton BTN_DELB 
      Caption         =   "删除"
      Height          =   615
      Left            =   8040
      Picture         =   "FMRCIN.frx":0000
      Style           =   1  'Graphical
      TabIndex        =   57
      Top             =   6480
      Width           =   1695
   End
   Begin VB.CommandButton BTN_INSB 
      Caption         =   "新增资料