frminstore.vb

一个公司的光盘仓库管理软件源码

        Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
        Friend WithEvents ToolBarButton5 As System.Windows.Forms.ToolBarButton
        Friend WithEvents Label9 As System.Windows.Forms.Label
        Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
        Friend WithEvents tlbFirst As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbPreview As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbNext As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbEnd As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbSave As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbCancel As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbExit As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbEdit As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbDelete As System.Windows.Forms.ToolBarButton
        Friend WithEvents tlbNew As System.Windows.Forms.ToolBarButton
        Friend WithEvents tdbg_InStore As C1.Win.C1TrueDBGrid.C1TrueDBGrid
        Friend WithEvents tdbd_SpecBill As C1.Win.C1TrueDBGrid.C1TrueDBDropdown
        Friend WithEvents tdbd_StorePosition As C1.Win.C1TrueDBGrid.C1TrueDBDropdown
        Friend WithEvents cobBanCi As System.Windows.Forms.ComboBox
        Friend WithEvents txbInStoreCode As System.Windows.Forms.TextBox
        Friend WithEvents cobInStoreAccepter As System.Windows.Forms.ComboBox
        Friend WithEvents cobInStorer As System.Windows.Forms.ComboBox
        Friend WithEvents cobInStoreWriter As System.Windows.Forms.ComboBox
        Friend WithEvents cobDepartment As System.Windows.Forms.ComboBox
        Friend WithEvents dtpInStoreTime As System.Windows.Forms.DateTimePicker
        Friend WithEvents txbInStoreMemo As System.Windows.Forms.TextBox
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
            Me.components = New System.ComponentModel.Container
            Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(FrmInstore))
            Me.cobInStoreAccepter = New System.Windows.Forms.ComboBox
            Me.cobInStorer = New System.Windows.Forms.ComboBox
            Me.cobInStoreWriter = New System.Windows.Forms.ComboBox
            Me.cobDepartment = New System.Windows.Forms.ComboBox
            Me.Label7 = New System.Windows.Forms.Label
            Me.dtpInStoreTime = New System.Windows.Forms.DateTimePicker
            Me.cobBanCi = New System.Windows.Forms.ComboBox
            Me.txbInStoreCode = New System.Windows.Forms.TextBox
            Me.Label6 = New System.Windows.Forms.Label
            Me.Label5 = New System.Windows.Forms.Label
            Me.Label4 = New System.Windows.Forms.Label
            Me.Label3 = New System.Windows.Forms.Label
            Me.Label2 = New System.Windows.Forms.Label
            Me.Label1 = New System.Windows.Forms.Label
            Me.ToolBar1 = New System.Windows.Forms.ToolBar
            Me.tlbFirst = New System.Windows.Forms.ToolBarButton
            Me.tlbPreview = New System.Windows.Forms.ToolBarButton
            Me.tlbNext = New System.Windows.Forms.ToolBarButton
            Me.tlbEnd = New System.Windows.Forms.ToolBarButton
            Me.ToolBarButton5 = New System.Windows.Forms.ToolBarButton
            Me.tlbNew = New System.Windows.Forms.ToolBarButton
            Me.tlbEdit = New System.Windows.Forms.ToolBarButton
            Me.tlbSave = New System.Windows.Forms.ToolBarButton
            Me.tlbCancel = New System.Windows.Forms.ToolBarButton
            Me.tlbDelete = New System.Windows.Forms.ToolBarButton
            Me.tlbExit = New System.Windows.Forms.ToolBarButton
            Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
            Me.Label9 = New System.Windows.Forms.Label
            Me.txbInStoreMemo = New System.Windows.Forms.TextBox
            Me.tdbg_InStore = New C1.Win.C1TrueDBGrid.C1TrueDBGrid
            Me.tdbd_SpecBill = New C1.Win.C1TrueDBGrid.C1TrueDBDropdown
            Me.tdbd_StorePosition = New C1.Win.C1TrueDBGrid.C1TrueDBDropdown
            CType(Me.tdbg_InStore, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.tdbd_SpecBill, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.tdbd_StorePosition, System.ComponentModel.ISupportInitialize).BeginInit()
            Me.SuspendLayout()
            '
            'cobInStoreAccepter
            '
            Me.cobInStoreAccepter.Location = New System.Drawing.Point(592, 416)
            Me.cobInStoreAccepter.Name = "cobInStoreAccepter"
            Me.cobInStoreAccepter.Size = New System.Drawing.Size(104, 20)
            Me.cobInStoreAccepter.TabIndex = 8
            '
            'cobInStorer
            '
            Me.cobInStorer.Location = New System.Drawing.Point(424, 416)
            Me.cobInStorer.Name = "cobInStorer"
            Me.cobInStorer.Size = New System.Drawing.Size(104, 20)
            Me.cobInStorer.TabIndex = 7
            '
            'cobInStoreWriter
            '
            Me.cobInStoreWriter.Location = New System.Drawing.Point(248, 416)
            Me.cobInStoreWriter.Name = "cobInStoreWriter"
            Me.cobInStoreWriter.Size = New System.Drawing.Size(104, 20)
            Me.cobInStoreWriter.TabIndex = 6
            '
            'cobDepartment
            '
            Me.cobDepartment.Location = New System.Drawing.Point(80, 416)
            Me.cobDepartment.Name = "cobDepartment"
            Me.cobDepartment.Size = New System.Drawing.Size(104, 20)
            Me.cobDepartment.TabIndex = 5
            '
            'Label7
            '
            Me.Label7.AutoSize = True
            Me.Label7.Location = New System.Drawing.Point(536, 418)
            Me.Label7.Name = "Label7"
            Me.Label7.Size = New System.Drawing.Size(42, 17)
            Me.Label7.TabIndex = 25
            Me.Label7.Text = "接收者"
            '
            'dtpInStoreTime
            '
            Me.dtpInStoreTime.CustomFormat = "yyyy-MM-dd"
            Me.dtpInStoreTime.Format = System.Windows.Forms.DateTimePickerFormat.Custom
            Me.dtpInStoreTime.Location = New System.Drawing.Point(480, 40)
            Me.dtpInStoreTime.Name = "dtpInStoreTime"
            Me.dtpInStoreTime.Size = New System.Drawing.Size(176, 21)
            Me.dtpInStoreTime.TabIndex = 2
            Me.dtpInStoreTime.Value = New Date(2006, 3, 25, 0, 0, 0, 0)
            '
            'cobBanCi
            '
            Me.cobBanCi.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
            Me.cobBanCi.Location = New System.Drawing.Point(264, 40)
            Me.cobBanCi.Name = "cobBanCi"
            Me.cobBanCi.Size = New System.Drawing.Size(144, 20)
            Me.cobBanCi.TabIndex = 1
            '
            'txbInStoreCode
            '
            Me.txbInStoreCode.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            Me.txbInStoreCode.Location = New System.Drawing.Point(72, 40)
            Me.txbInStoreCode.Name = "txbInStoreCode"
            Me.txbInStoreCode.Size = New System.Drawing.Size(120, 21)
            Me.txbInStoreCode.TabIndex = 0
            Me.txbInStoreCode.Text = ""
            '
            'Label6
            '
            Me.Label6.AutoSize = True
            Me.Label6.Location = New System.Drawing.Point(368, 418)
            Me.Label6.Name = "Label6"
            Me.Label6.Size = New System.Drawing.Size(42, 17)
            Me.Label6.TabIndex = 21
            Me.Label6.Text = "入库者"
            '
            'Label5
            '
            Me.Label5.AutoSize = True
            Me.Label5.Location = New System.Drawing.Point(200, 418)
            Me.Label5.Name = "Label5"
            Me.Label5.Size = New System.Drawing.Size(42, 17)
            Me.Label5.TabIndex = 20
            Me.Label5.Text = "填表者"
            '
            'Label4
            '
            Me.Label4.AutoSize = True
            Me.Label4.Location = New System.Drawing.Point(16, 418)
            Me.Label4.Name = "Label4"
            Me.Label4.Size = New System.Drawing.Size(54, 17)
            Me.Label4.TabIndex = 19
            Me.Label4.Text = "入库部门"
            '
            'Label3
            '
            Me.Label3.AutoSize = True
            Me.Label3.Location = New System.Drawing.Point(208, 42)
            Me.Label3.Name = "Label3"
            Me.Label3.Size = New System.Drawing.Size(54, 17)
            Me.Label3.TabIndex = 18
            Me.Label3.Text = "入库班次"
            '
            'Label2
            '
            Me.Label2.AutoSize = True
            Me.Label2.Location = New System.Drawing.Point(16, 42)
            Me.Label2.Name = "Label2"
            Me.Label2.Size = New System.Drawing.Size(54, 17)
            Me.Label2.TabIndex = 17
            Me.Label2.Text = "入库单号"
            '
            'Label1
            '
            Me.Label1.AutoSize = True
            Me.Label1.Location = New System.Drawing.Point(424, 42)
            Me.Label1.Name = "Label1"
            Me.Label1.Size = New System.Drawing.Size(54, 17)
            Me.Label1.TabIndex = 16
            Me.Label1.Text = "入库时间"