dataset1.designer.vb

VB.NET开发的进销存系统,数据库SQLSERVER

        Protected Overrides Sub OnRowChanging(ByVal e As System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.商品清单RowChangingEvent) Is Nothing) Then
                RaiseEvent 商品清单RowChanging(Me, New 商品清单RowChangeEvent(CType(e.Row,商品清单Row), e.Action))
            End If
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.商品清单RowDeletedEvent) Is Nothing) Then
                RaiseEvent 商品清单RowDeleted(Me, New 商品清单RowChangeEvent(CType(e.Row,商品清单Row), e.Action))
            End If
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.商品清单RowDeletingEvent) Is Nothing) Then
                RaiseEvent 商品清单RowDeleting(Me, New 商品清单RowChangeEvent(CType(e.Row,商品清单Row), e.Action))
            End If
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Remove商品清单Row(ByVal row As 商品清单Row)
            Me.Rows.Remove(row)
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As System.Xml.Schema.XmlSchemaSet) As System.Xml.Schema.XmlSchemaComplexType
            Dim type As System.Xml.Schema.XmlSchemaComplexType = New System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As System.Xml.Schema.XmlSchemaSequence = New System.Xml.Schema.XmlSchemaSequence
            Dim ds As DataSet1 = New DataSet1
            xs.Add(ds.GetSchemaSerializable)
            Dim any1 As System.Xml.Schema.XmlSchemaAny = New System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As System.Xml.Schema.XmlSchemaAny = New System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As System.Xml.Schema.XmlSchemaAttribute = New System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As System.Xml.Schema.XmlSchemaAttribute = New System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "商品清单DataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Return type
        End Function
    End Class
    
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     System.Serializable(),  _
     System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class 供货商清单DataTable
        Inherits System.Data.DataTable
        Implements System.Collections.IEnumerable
        
        Private column供货商号 As System.Data.DataColumn
        
        Private column拼音编码 As System.Data.DataColumn
        
        Private column名称 As System.Data.DataColumn
        
        Private column业务员 As System.Data.DataColumn
        
        Private column电话 As System.Data.DataColumn
        
        Private column地址 As System.Data.DataColumn
        
        Private column邮编 As System.Data.DataColumn
        
        Private column区号 As System.Data.DataColumn
        
        Private column地区 As System.Data.DataColumn
        
        Private column类型 As System.Data.DataColumn
        
        Private column传真 As System.Data.DataColumn
        
        Private column电报 As System.Data.DataColumn
        
        Private column开户行 As System.Data.DataColumn
        
        Private column开户行邮编 As System.Data.DataColumn
        
        Private column银行帐号 As System.Data.DataColumn
        
        Private column税号 As System.Data.DataColumn
        
        Private column库房地址 As System.Data.DataColumn
        
        Private column库房电话 As System.Data.DataColumn
        
        Private column业务部门 As System.Data.DataColumn
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "供货商清单"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As System.Runtime.Serialization.SerializationInfo, ByVal context As System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 供货商号Column() As System.Data.DataColumn
            Get
                Return Me.column供货商号
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 拼音编码Column() As System.Data.DataColumn
            Get
                Return Me.column拼音编码
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 名称Column() As System.Data.DataColumn
            Get
                Return Me.column名称
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 业务员Column() As System.Data.DataColumn
            Get
                Return Me.column业务员
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 电话Column() As System.Data.DataColumn
            Get
                Return Me.column电话
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 地址Column() As System.Data.DataColumn
            Get
                Return Me.column地址
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 邮编Column() As System.Data.DataColumn
            Get
                Return Me.column邮编
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 区号Column() As System.Data.DataColumn
            Get
                Return Me.column区号
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 地区Column() As System.Data.DataColumn
            Get
                Return Me.column地区
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 类型Column() As System.Data.DataColumn
            Get
                Return Me.column类型
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 传真Column() As System.Data.DataColumn
            Get
                Return Me.column传真
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 电报Column() As System.Data.DataColumn
            Get
                Return Me.column电报
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 开户行Column() As System.Data.DataColumn
            Get
                Return Me.column开户行
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 开户行邮编Column() As System.Data.DataColumn
            Get
                Return Me.column开户行邮编
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 银行帐号Column() As System.Data.DataColumn
            Get
                Return Me.column银行帐号
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 税号Column() As System.Data.DataColumn
            Get
                Return Me.column税号
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 库房地址Column() As System.Data.DataColumn
            Get
                Return Me.column库房地址
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 库房电话Column() As System.Data.DataColumn
            Get
                Return Me.column库房电话
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property 业务部门Column() As System.Data.DataColumn
            Get
                Return Me.column业务部门
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get