frmorder.frm

企业ERP系统 采用VB+SQL2000实现。 有客户合约

VERSION 5.00
Object = "{4932CEF1-2CAA-11D2-A165-0060081C43D9}#2.0#0"; "Actbar2.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frmOrder 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "加工單"
   ClientHeight    =   8490
   ClientLeft      =   45
   ClientTop       =   435
   ClientWidth     =   8265
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   8490
   ScaleWidth      =   8265
   ShowInTaskbar   =   0   'False
   StartUpPosition =   3  'Windows Default
   Begin ActiveBar2LibraryCtl.ActiveBar2 ActiveBar21 
      Height          =   8490
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   8265
      _LayoutVersion  =   1
      _ExtentX        =   14579
      _ExtentY        =   14975
      _DataPath       =   ""
      Bands           =   "frmOrder.frx":0000
      Begin TabDlg.SSTab SSTab1 
         Height          =   7875
         Left            =   60
         TabIndex        =   1
         Top             =   480
         Width           =   8055
         _ExtentX        =   14208
         _ExtentY        =   13891
         _Version        =   393216
         TabHeight       =   520
         TabCaption(0)   =   "基本信息"
         TabPicture(0)   =   "frmOrder.frx":3288
         Tab(0).ControlEnabled=   -1  'True
         Tab(0).Control(0)=   "Frame1"
         Tab(0).Control(0).Enabled=   0   'False
         Tab(0).ControlCount=   1
         TabCaption(1)   =   "投坯備注"
         TabPicture(1)   =   "frmOrder.frx":32A4
         Tab(1).ControlEnabled=   0   'False
         Tab(1).Control(0)=   "Frame3"
         Tab(1).Control(0).Enabled=   0   'False
         Tab(1).ControlCount=   1
         TabCaption(2)   =   "備淮"
         TabPicture(2)   =   "frmOrder.frx":32C0
         Tab(2).ControlEnabled=   0   'False
         Tab(2).Control(0)=   "Frame2"
         Tab(2).Control(0).Enabled=   0   'False
         Tab(2).ControlCount=   1
         Begin VB.Frame Frame3 
            Height          =   7395
            Left            =   -74880
            TabIndex        =   54
            Top             =   360
            Width           =   7815
            Begin VB.TextBox Text17 
               Height          =   6975
               Left            =   180
               TabIndex        =   56
               Top             =   240
               Width           =   7455
            End
         End
         Begin VB.Frame Frame2 
            Height          =   7395
            Left            =   -74880
            TabIndex        =   49
            Top             =   360
            Width           =   7815
            Begin VB.TextBox Text18 
               Height          =   6075
               Left            =   180
               TabIndex        =   57
               Top             =   240
               Width           =   7455
            End
            Begin VB.TextBox txtCreateOperator 
               BackColor       =   &H8000000F&
               Enabled         =   0   'False
               Height          =   315
               Left            =   1320
               TabIndex        =   51
               Top             =   6480
               Width           =   6015
            End
            Begin VB.TextBox Text14 
               BackColor       =   &H8000000F&
               Enabled         =   0   'False
               Height          =   315
               Left            =   1320
               TabIndex        =   50
               Top             =   6900
               Width           =   6015
            End
            Begin VB.Label Label10 
               Caption         =   "檔案創建信息"
               Height          =   255
               Left            =   120
               TabIndex        =   53
               Top             =   6540
               Width           =   1155
            End
            Begin VB.Label Label12 
               Caption         =   "檔案修改信息"
               Height          =   255
               Left            =   120
               TabIndex        =   52
               Top             =   6960
               Width           =   1155
            End
         End
         Begin VB.Frame Frame1 
            Height          =   7335
            Left            =   120
            TabIndex        =   2
            Top             =   360
            Width           =   7815
            Begin VB.PictureBox TDBGrid1 
               Height          =   2295
               Left            =   180
               ScaleHeight     =   2235
               ScaleWidth      =   7455
               TabIndex        =   55
               Top             =   4920
               Width           =   7515
            End
            Begin VB.ComboBox cbbCompany 
               BackColor       =   &H00C0C0FF&
               Height          =   315
               ItemData        =   "frmOrder.frx":32DC
               Left            =   1380
               List            =   "frmOrder.frx":32EF
               TabIndex        =   24
               Top             =   1080
               Width           =   1995
            End
            Begin VB.ComboBox cbbStorehouse 
               BackColor       =   &H00C0C0FF&
               Height          =   315
               ItemData        =   "frmOrder.frx":3311
               Left            =   5580
               List            =   "frmOrder.frx":3321
               TabIndex        =   23
               Top             =   1080
               Width           =   1995
            End
            Begin VB.TextBox txtGodownEntryNo 
               Height          =   315
               Left            =   5580
               TabIndex        =   22
               Top             =   1500
               Width           =   1995
            End
            Begin VB.TextBox txtShortName 
               Height          =   315
               Left            =   5580
               TabIndex        =   21
               Top             =   240
               Width           =   1995
            End
            Begin VB.CommandButton cmdPurvey 
               Caption         =   "..."
               Height          =   315
               Left            =   8520
               TabIndex        =   20
               Top             =   240
               Width           =   555
            End
            Begin VB.TextBox txtCustomerNo 
               BackColor       =   &H00C0C0FF&
               Height          =   315
               Left            =   1380
               TabIndex        =   19
               Top             =   240
               Width           =   1995
            End
            Begin VB.TextBox Text1 
               Height          =   315
               Left            =   1380
               TabIndex        =   18
               Top             =   1500
               Width           =   1995
            End
            Begin VB.TextBox Text2 
               Height          =   315
               Left            =   1380
               TabIndex        =   17
               Top             =   1920
               Width           =   1995
            End
            Begin VB.TextBox Text3 
               Height          =   315
               Left            =   5580
               TabIndex        =   16
               Top             =   1920
               Width           =   1995
            End
            Begin VB.TextBox Text4 
               Height          =   315
               Left            =   1380
               TabIndex        =   15
               Top             =   2340
               Width           =   1995
            End
            Begin VB.TextBox Text5 
               Height          =   315
               Left            =   5580
               TabIndex        =   14
               Top             =   2340
               Width           =   1995
            End
            Begin VB.TextBox Text6 
               Height          =   315
               Left            =   5580
               TabIndex        =   13
               Top             =   2760
               Width           =   1995
            End
            Begin VB.TextBox Text7 
               Height          =   315
               Left            =   1380
               TabIndex        =   12
               Top             =   2760
               Width           =   1995
            End
            Begin VB.CommandButton Command1 
               Caption         =   "..."
               Height          =   315
               Left            =   3480
               TabIndex        =   11
               Top             =   1500
               Width           =   555
            End
            Begin VB.TextBox Text8 
               Height          =   315
               Left            =   1380
               TabIndex        =   10
               Top             =   3180
               Width           =   1995
            End
            Begin VB.TextBox Text9 
               Height          =   315
               Left            =   5580
               TabIndex        =   9
               Top             =   3240
               Width           =   1995
            End
            Begin VB.TextBox Text10