frmproductsdemand.vb

生产管理系统。vb.net sql2

        Me.GroupBox1.Controls.Add(Me.txbBegDate)
        Me.GroupBox1.Controls.Add(Me.Label8)
        Me.GroupBox1.Controls.Add(Me.txbPlanDate)
        Me.GroupBox1.Controls.Add(Me.Label7)
        Me.GroupBox1.Controls.Add(Me.txbDate)
        Me.GroupBox1.Controls.Add(Me.Label6)
        Me.GroupBox1.Controls.Add(Me.txbName)
        Me.GroupBox1.Controls.Add(Me.Label5)
        Me.GroupBox1.Controls.Add(Me.txbID)
        Me.GroupBox1.Controls.Add(Me.Label4)
        Me.GroupBox1.Location = New System.Drawing.Point(208, 80)
        Me.GroupBox1.Name = "GroupBox1"
        Me.GroupBox1.Size = New System.Drawing.Size(320, 269)
        Me.GroupBox1.TabIndex = 4
        Me.GroupBox1.TabStop = False
        '
        'btnDate
        '
        Me.btnDate.Enabled = False
        Me.btnDate.Image = CType(resources.GetObject("btnDate.Image"), System.Drawing.Image)
        Me.btnDate.Location = New System.Drawing.Point(232, 60)
        Me.btnDate.Name = "btnDate"
        Me.btnDate.Size = New System.Drawing.Size(24, 23)
        Me.btnDate.TabIndex = 22
        '
        'btnProduct
        '
        Me.btnProduct.Enabled = False
        Me.btnProduct.Image = CType(resources.GetObject("btnProduct.Image"), System.Drawing.Image)
        Me.btnProduct.Location = New System.Drawing.Point(232, 17)
        Me.btnProduct.Name = "btnProduct"
        Me.btnProduct.Size = New System.Drawing.Size(24, 23)
        Me.btnProduct.TabIndex = 21
        '
        'txbRemark
        '
        Me.txbRemark.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.备注"))
        Me.txbRemark.Location = New System.Drawing.Point(56, 232)
        Me.txbRemark.Multiline = True
        Me.txbRemark.Name = "txbRemark"
        Me.txbRemark.Size = New System.Drawing.Size(200, 32)
        Me.txbRemark.TabIndex = 16
        Me.txbRemark.Text = ""
        '
        'Label11
        '
        Me.Label11.Location = New System.Drawing.Point(64, 216)
        Me.Label11.Name = "Label11"
        Me.Label11.Size = New System.Drawing.Size(64, 16)
        Me.Label11.TabIndex = 15
        Me.Label11.Text = "备注"
        '
        'GroupBox2
        '
        Me.GroupBox2.Controls.Add(Me.cbbState)
        Me.GroupBox2.Location = New System.Drawing.Point(56, 165)
        Me.GroupBox2.Name = "GroupBox2"
        Me.GroupBox2.Size = New System.Drawing.Size(200, 43)
        Me.GroupBox2.TabIndex = 14
        Me.GroupBox2.TabStop = False
        Me.GroupBox2.Text = "状态"
        '
        'cbbState
        '
        Me.cbbState.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.状态"))
        Me.cbbState.Items.AddRange(New Object() {"正常", "无效"})
        Me.cbbState.Location = New System.Drawing.Point(48, 14)
        Me.cbbState.Name = "cbbState"
        Me.cbbState.Size = New System.Drawing.Size(104, 20)
        Me.cbbState.TabIndex = 0
        '
        'txbCount
        '
        Me.txbCount.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.需求数量"))
        Me.txbCount.Location = New System.Drawing.Point(120, 142)
        Me.txbCount.Name = "txbCount"
        Me.txbCount.TabIndex = 13
        Me.txbCount.Text = ""
        '
        'Label10
        '
        Me.Label10.Location = New System.Drawing.Point(64, 150)
        Me.Label10.Name = "Label10"
        Me.Label10.Size = New System.Drawing.Size(64, 16)
        Me.Label10.TabIndex = 12
        Me.Label10.Text = "需求数量"
        '
        'txbEndDate
        '
        Me.txbEndDate.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.结束日期"))
        Me.txbEndDate.Location = New System.Drawing.Point(120, 123)
        Me.txbEndDate.Name = "txbEndDate"
        Me.txbEndDate.TabIndex = 11
        Me.txbEndDate.Text = ""
        '
        'Label9
        '
        Me.Label9.Location = New System.Drawing.Point(64, 131)
        Me.Label9.Name = "Label9"
        Me.Label9.Size = New System.Drawing.Size(64, 16)
        Me.Label9.TabIndex = 10
        Me.Label9.Text = "结束日期"
        '
        'txbBegDate
        '
        Me.txbBegDate.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.开始日期"))
        Me.txbBegDate.Location = New System.Drawing.Point(120, 101)
        Me.txbBegDate.Name = "txbBegDate"
        Me.txbBegDate.TabIndex = 9
        Me.txbBegDate.Text = ""
        '
        'Label8
        '
        Me.Label8.Location = New System.Drawing.Point(64, 108)
        Me.Label8.Name = "Label8"
        Me.Label8.Size = New System.Drawing.Size(64, 16)
        Me.Label8.TabIndex = 8
        Me.Label8.Text = "开始日期"
        '
        'txbPlanDate
        '
        Me.txbPlanDate.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.计划期"))
        Me.txbPlanDate.Location = New System.Drawing.Point(120, 80)
        Me.txbPlanDate.Name = "txbPlanDate"
        Me.txbPlanDate.TabIndex = 7
        Me.txbPlanDate.Text = ""
        '
        'Label7
        '
        Me.Label7.Location = New System.Drawing.Point(74, 88)
        Me.Label7.Name = "Label7"
        Me.Label7.Size = New System.Drawing.Size(64, 16)
        Me.Label7.TabIndex = 6
        Me.Label7.Text = "计划期"
        '
        'txbDate
        '
        Me.txbDate.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.年份"))
        Me.txbDate.Location = New System.Drawing.Point(120, 60)
        Me.txbDate.Name = "txbDate"
        Me.txbDate.TabIndex = 5
        Me.txbDate.Text = ""
        '
        'Label6
        '
        Me.Label6.Location = New System.Drawing.Point(88, 67)
        Me.Label6.Name = "Label6"
        Me.Label6.Size = New System.Drawing.Size(32, 16)
        Me.Label6.TabIndex = 4
        Me.Label6.Text = "年份"
        '
        'txbName
        '
        Me.txbName.Location = New System.Drawing.Point(120, 40)
        Me.txbName.Name = "txbName"
        Me.txbName.TabIndex = 3
        Me.txbName.Text = ""
        '
        'Label5
        '
        Me.Label5.Location = New System.Drawing.Point(64, 46)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(64, 16)
        Me.Label5.TabIndex = 2
        Me.Label5.Text = "产品名称"
        '
        'txbID
        '
        Me.txbID.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "主需求计划.物料编号"))
        Me.txbID.Location = New System.Drawing.Point(120, 18)
        Me.txbID.Name = "txbID"
        Me.txbID.TabIndex = 1
        Me.txbID.Text = ""
        '
        'Label4
        '
        Me.Label4.Location = New System.Drawing.Point(64, 24)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(64, 16)
        Me.Label4.TabIndex = 0
        Me.Label4.Text = "产品编号"
        '
        'frmProductsDemand
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
        Me.ClientSize = New System.Drawing.Size(528, 349)
        Me.Controls.Add(Me.GroupBox1)
        Me.Name = "frmProductsDemand"
        Me.Controls.SetChildIndex(Me.GroupBox1, 0)
        CType(Me.DataSet11, System.ComponentModel.ISupportInitialize).EndInit()
        Me.GroupBox1.ResumeLayout(False)
        Me.GroupBox2.ResumeLayout(False)
        Me.ResumeLayout(False)

    End Sub

#End Region
    Public Overrides Sub Prepare()
        Me.Text = "产品需求计划维护"
        Me.Label1.Text = "物料编号"
        Me.Label2.Text = "年份"
        Me.Label3.Text = "计划期"
        SetTextBoxState(False)

    End Sub
    Public Overrides Sub SetDataGrid()
        SqlConnection1.ConnectionString = DataBase.sConn
        SqlDataAdapter1.Fill(DataSet11)