📄 dataset1.designer.vb
字号:
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Overridable Function GetEnumerator() As System.Collections.IEnumerator Implements System.Collections.IEnumerable.GetEnumerator
Return Me.Rows.GetEnumerator
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Overrides Function Clone() As System.Data.DataTable
Dim cln As 组织机构编码表DataTable = CType(MyBase.Clone,组织机构编码表DataTable)
cln.InitVars
Return cln
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Function CreateInstance() As System.Data.DataTable
Return New 组织机构编码表DataTable
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend Sub InitVars()
Me.column类别 = MyBase.Columns("类别")
Me.column拼音编码 = MyBase.Columns("拼音编码")
Me.column单位地址 = MyBase.Columns("单位地址")
Me.column单位电话号码 = MyBase.Columns("单位电话号码")
Me.column开户银行 = MyBase.Columns("开户银行")
Me.column帐号 = MyBase.Columns("帐号")
Me.column开户全称 = MyBase.Columns("开户全称")
Me.column单位编号 = MyBase.Columns("单位编号")
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub InitClass()
Me.column类别 = New System.Data.DataColumn("类别", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column类别)
Me.column拼音编码 = New System.Data.DataColumn("拼音编码", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column拼音编码)
Me.column单位地址 = New System.Data.DataColumn("单位地址", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column单位地址)
Me.column单位电话号码 = New System.Data.DataColumn("单位电话号码", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column单位电话号码)
Me.column开户银行 = New System.Data.DataColumn("开户银行", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column开户银行)
Me.column帐号 = New System.Data.DataColumn("帐号", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column帐号)
Me.column开户全称 = New System.Data.DataColumn("开户全称", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column开户全称)
Me.column单位编号 = New System.Data.DataColumn("单位编号", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.column单位编号)
Me.Constraints.Add(New System.Data.UniqueConstraint("Constraint1", New System.Data.DataColumn() {Me.column单位编号}, true))
Me.column单位编号.AllowDBNull = false
Me.column单位编号.Unique = true
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Function New组织机构编码表Row() As 组织机构编码表Row
Return CType(Me.NewRow,组织机构编码表Row)
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Function NewRowFromBuilder(ByVal builder As System.Data.DataRowBuilder) As System.Data.DataRow
Return New 组织机构编码表Row(builder)
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Function GetRowType() As System.Type
Return GetType(组织机构编码表Row)
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Sub OnRowChanged(ByVal e As System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e)
If (Not (Me.组织机构编码表RowChangedEvent) Is Nothing) Then
RaiseEvent 组织机构编码表RowChanged(Me, New 组织机构编码表RowChangeEvent(CType(e.Row,组织机构编码表Row), e.Action))
End If
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
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
<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(), _
System.ComponentModel.Browsable(false)> _
Public ReadOnly Property Count() As Integer
Get
Return Me.Rows.Count
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Default ReadOnly Property Item(ByVal index As Integer) As 个人所得税表Row
Get
Return CType(Me.Rows(index),个人所得税表Row)
End Get
End Property
Public Event 个人所得税表RowChanging As 个人所得税表RowChangeEventHandler
Public Event 个人所得税表RowChanged As 个人所得税表RowChangeEventHandler
Public Event 个人所得税表RowDeleting As 个人所得税表RowChangeEventHandler
Public Event 个人所得税表RowDeleted As 个人所得税表RowChangeEventHandler
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -