📄 librarydataset11.designer.vb
字号:
Partial Public Class BookDetailsDataTable
Inherits System.Data.DataTable
Implements System.Collections.IEnumerable
Private columnBookNo As System.Data.DataColumn
Private columnISBN As System.Data.DataColumn
Private columnBookName As System.Data.DataColumn
Private columnAuthor As System.Data.DataColumn
Private columnPublishDate As System.Data.DataColumn
Private columnEdition As System.Data.DataColumn
Private columnPublisher As System.Data.DataColumn
Private columnPrice As System.Data.DataColumn
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub New()
MyBase.New
Me.TableName = "BookDetails"
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 BookNoColumn() As System.Data.DataColumn
Get
Return Me.columnBookNo
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ISBNColumn() As System.Data.DataColumn
Get
Return Me.columnISBN
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property BookNameColumn() As System.Data.DataColumn
Get
Return Me.columnBookName
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property AuthorColumn() As System.Data.DataColumn
Get
Return Me.columnAuthor
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property PublishDateColumn() As System.Data.DataColumn
Get
Return Me.columnPublishDate
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property EditionColumn() As System.Data.DataColumn
Get
Return Me.columnEdition
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property PublisherColumn() As System.Data.DataColumn
Get
Return Me.columnPublisher
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property PriceColumn() As System.Data.DataColumn
Get
Return Me.columnPrice
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 BookDetailsRow
Get
Return CType(Me.Rows(index),BookDetailsRow)
End Get
End Property
Public Event BookDetailsRowChanging As BookDetailsRowChangeEventHandler
Public Event BookDetailsRowChanged As BookDetailsRowChangeEventHandler
Public Event BookDetailsRowDeleting As BookDetailsRowChangeEventHandler
Public Event BookDetailsRowDeleted As BookDetailsRowChangeEventHandler
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Overloads Sub AddBookDetailsRow(ByVal row As BookDetailsRow)
Me.Rows.Add(row)
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Overloads Function AddBookDetailsRow(ByVal BookNo As String, ByVal ISBN As String, ByVal BookName As String, ByVal Author As String, ByVal PublishDate As String, ByVal Edition As String, ByVal Publisher As String, ByVal Price As String) As BookDetailsRow
Dim rowBookDetailsRow As BookDetailsRow = CType(Me.NewRow,BookDetailsRow)
rowBookDetailsRow.ItemArray = New Object() {BookNo, ISBN, BookName, Author, PublishDate, Edition, Publisher, Price}
Me.Rows.Add(rowBookDetailsRow)
Return rowBookDetailsRow
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Function FindByBookNo(ByVal BookNo As String) As BookDetailsRow
Return CType(Me.Rows.Find(New Object() {BookNo}),BookDetailsRow)
End Function
<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 BookDetailsDataTable = CType(MyBase.Clone,BookDetailsDataTable)
cln.InitVars
Return cln
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Function CreateInstance() As System.Data.DataTable
Return New BookDetailsDataTable
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend Sub InitVars()
Me.columnBookNo = MyBase.Columns("BookNo")
Me.columnISBN = MyBase.Columns("ISBN")
Me.columnBookName = MyBase.Columns("BookName")
Me.columnAuthor = MyBase.Columns("Author")
Me.columnPublishDate = MyBase.Columns("PublishDate")
Me.columnEdition = MyBase.Columns("Edition")
Me.columnPublisher = MyBase.Columns("Publisher")
Me.columnPrice = MyBase.Columns("Price")
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub InitClass()
Me.columnBookNo = New System.Data.DataColumn("BookNo", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnBookNo)
Me.columnISBN = New System.Data.DataColumn("ISBN", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnISBN)
Me.columnBookName = New System.Data.DataColumn("BookName", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnBookName)
Me.columnAuthor = New System.Data.DataColumn("Author", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnAuthor)
Me.columnPublishDate = New System.Data.DataColumn("PublishDate", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnPublishDate)
Me.columnEdition = New System.Data.DataColumn("Edition", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnEdition)
Me.columnPublisher = New System.Data.DataColumn("Publisher", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnPublisher)
Me.columnPrice = New System.Data.DataColumn("Price", GetType(String), Nothing, System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnPrice)
Me.Constraints.Add(New System.Data.UniqueConstraint("Constraint1", New System.Data.DataColumn() {Me.columnBookNo}, true))
Me.columnBookNo.AllowDBNull = false
Me.columnBookNo.Unique = true
Me.columnBookNo.MaxLength = 10
Me.columnISBN.MaxLength = 20
Me.columnBookName.MaxLength = 20
Me.columnAuthor.MaxLength = 10
Me.columnPublishDate.MaxLength = 50
Me.columnEdition.MaxLength = 20
Me.columnPublisher.MaxLength = 50
Me.columnPrice.MaxLength = 50
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Function NewBookDetailsRow() As BookDetailsRow
Return CType(Me.NewRow,BookDetailsRow)
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Function NewRowFromBuilder(ByVal builder As System.Data.DataRowBuilder) As System.Data.DataRow
Return New BookDetailsRow(builder)
End Function
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected Overrides Function GetRowType() As System.Type
Return GetType(BookDetailsRow)
End Function
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -