亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

? 歡迎來到蟲蟲下載站! | ?? 資源下載 ?? 資源專輯 ?? 關(guān)于我們
? 蟲蟲下載站

?? weblib書籍查詢.vb

?? 本頁只為圖象處理愛好者交流之用, 未經(jīng)本人同意, 請勿下載. 另,本書及所附source已于1999年由清華大學(xué)出版社出版,請支持正版書籍及軟件,謝謝.
?? VB
?? 第 1 頁 / 共 2 頁
字號:
?'------------------------------------------------------------------------------
' <autogenerated>
'     This code was generated by a tool.
'     Runtime Version: 1.0.3705.0
'
'     Changes to this file may cause incorrect behavior and will be lost if 
'     the code is regenerated.
' </autogenerated>
'------------------------------------------------------------------------------

Option Strict Off
Option Explicit On

Imports System
Imports System.Data
Imports System.Runtime.Serialization
Imports System.Xml


<Serializable(),  _
 System.ComponentModel.DesignerCategoryAttribute("code"),  _
 System.Diagnostics.DebuggerStepThrough(),  _
 System.ComponentModel.ToolboxItem(true)>  _
Public Class WebLib書籍查詢
    Inherits DataSet
    
    Private table書籍信息 As 書籍信息DataTable
    
    Public Sub New()
        MyBase.New
        Me.InitClass
        Dim schemaChangedHandler As System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
        AddHandler Me.Tables.CollectionChanged, schemaChangedHandler
        AddHandler Me.Relations.CollectionChanged, schemaChangedHandler
    End Sub
    
    Protected Sub New(ByVal info As SerializationInfo, ByVal context As StreamingContext)
        MyBase.New
        Dim strSchema As String = CType(info.GetValue("XmlSchema", GetType(System.String)),String)
        If (Not (strSchema) Is Nothing) Then
            Dim ds As DataSet = New DataSet
            ds.ReadXmlSchema(New XmlTextReader(New System.IO.StringReader(strSchema)))
            If (Not (ds.Tables("書籍信息")) Is Nothing) Then
                Me.Tables.Add(New 書籍信息DataTable(ds.Tables("書籍信息")))
            End If
            Me.DataSetName = ds.DataSetName
            Me.Prefix = ds.Prefix
            Me.Namespace = ds.Namespace
            Me.Locale = ds.Locale
            Me.CaseSensitive = ds.CaseSensitive
            Me.EnforceConstraints = ds.EnforceConstraints
            Me.Merge(ds, false, System.Data.MissingSchemaAction.Add)
            Me.InitVars
        Else
            Me.InitClass
        End If
        Me.GetSerializationData(info, context)
        Dim schemaChangedHandler As System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
        AddHandler Me.Tables.CollectionChanged, schemaChangedHandler
        AddHandler Me.Relations.CollectionChanged, schemaChangedHandler
    End Sub
    
    <System.ComponentModel.Browsable(false),  _
     System.ComponentModel.DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property 書籍信息 As 書籍信息DataTable
        Get
            Return Me.table書籍信息
        End Get
    End Property
    
    Public Overrides Function Clone() As DataSet
        Dim cln As WebLib書籍查詢 = CType(MyBase.Clone,WebLib書籍查詢)
        cln.InitVars
        Return cln
    End Function
    
    Protected Overrides Function ShouldSerializeTables() As Boolean
        Return false
    End Function
    
    Protected Overrides Function ShouldSerializeRelations() As Boolean
        Return false
    End Function
    
    Protected Overrides Sub ReadXmlSerializable(ByVal reader As XmlReader)
        Me.Reset
        Dim ds As DataSet = New DataSet
        ds.ReadXml(reader)
        If (Not (ds.Tables("書籍信息")) Is Nothing) Then
            Me.Tables.Add(New 書籍信息DataTable(ds.Tables("書籍信息")))
        End If
        Me.DataSetName = ds.DataSetName
        Me.Prefix = ds.Prefix
        Me.Namespace = ds.Namespace
        Me.Locale = ds.Locale
        Me.CaseSensitive = ds.CaseSensitive
        Me.EnforceConstraints = ds.EnforceConstraints
        Me.Merge(ds, false, System.Data.MissingSchemaAction.Add)
        Me.InitVars
    End Sub
    
    Protected Overrides Function GetSchemaSerializable() As System.Xml.Schema.XmlSchema
        Dim stream As System.IO.MemoryStream = New System.IO.MemoryStream
        Me.WriteXmlSchema(New XmlTextWriter(stream, Nothing))
        stream.Position = 0
        Return System.Xml.Schema.XmlSchema.Read(New XmlTextReader(stream), Nothing)
    End Function
    
    Friend Sub InitVars()
        Me.table書籍信息 = CType(Me.Tables("書籍信息"),書籍信息DataTable)
        If (Not (Me.table書籍信息) Is Nothing) Then
            Me.table書籍信息.InitVars
        End If
    End Sub
    
    Private Sub InitClass()
        Me.DataSetName = "WebLib書籍查詢"
        Me.Prefix = ""
        Me.Namespace = "http://www.tempuri.org/WebLib書籍查詢.xsd"
        Me.Locale = New System.Globalization.CultureInfo("zh-CN")
        Me.CaseSensitive = false
        Me.EnforceConstraints = true
        Me.table書籍信息 = New 書籍信息DataTable
        Me.Tables.Add(Me.table書籍信息)
    End Sub
    
    Private Function ShouldSerialize書籍信息() As Boolean
        Return false
    End Function
    
    Private Sub SchemaChanged(ByVal sender As Object, ByVal e As System.ComponentModel.CollectionChangeEventArgs)
        If (e.Action = System.ComponentModel.CollectionChangeAction.Remove) Then
            Me.InitVars
        End If
    End Sub
    
    Public Delegate Sub 書籍信息RowChangeEventHandler(ByVal sender As Object, ByVal e As 書籍信息RowChangeEvent)
    
    <System.Diagnostics.DebuggerStepThrough()>  _
    Public Class 書籍信息DataTable
        Inherits DataTable
        Implements System.Collections.IEnumerable
        
        Private column書號 As DataColumn
        
        Private column叢書系列 As DataColumn
        
        Private column作者 As DataColumn
        
        Private column責(zé)任編輯 As DataColumn
        
        Private column字?jǐn)?shù) As DataColumn
        
        Private column定價 As DataColumn
        
        Private column出版時間 As DataColumn
        
        Private column主題分類 As DataColumn
        
        Private column二級分類 As DataColumn
        
        Private column館內(nèi)借閱分類 As DataColumn
        
        Private column總冊數(shù) As DataColumn
        
        Private column庫存量 As DataColumn
        
        Private column出版社 As DataColumn
        
        Private column書名 As DataColumn
        
        Friend Sub New()
            MyBase.New("書籍信息")
            Me.InitClass
        End Sub
        
        Friend Sub New(ByVal table As DataTable)
            MyBase.New(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
            Me.DisplayExpression = table.DisplayExpression
        End Sub
        
        <System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        Friend ReadOnly Property 書號Column As DataColumn
            Get
                Return Me.column書號
            End Get
        End Property
        
        Friend ReadOnly Property 叢書系列Column As DataColumn
            Get
                Return Me.column叢書系列
            End Get
        End Property
        
        Friend ReadOnly Property 作者Column As DataColumn
            Get
                Return Me.column作者
            End Get
        End Property
        
        Friend ReadOnly Property 責(zé)任編輯Column As DataColumn
            Get
                Return Me.column責(zé)任編輯
            End Get
        End Property
        
        Friend ReadOnly Property 字?jǐn)?shù)Column As DataColumn
            Get
                Return Me.column字?jǐn)?shù)
            End Get
        End Property
        
        Friend ReadOnly Property 定價Column As DataColumn
            Get
                Return Me.column定價
            End Get
        End Property
        
        Friend ReadOnly Property 出版時間Column As DataColumn
            Get
                Return Me.column出版時間
            End Get
        End Property
        
        Friend ReadOnly Property 主題分類Column As DataColumn
            Get
                Return Me.column主題分類
            End Get
        End Property
        
        Friend ReadOnly Property 二級分類Column As DataColumn
            Get
                Return Me.column二級分類
            End Get
        End Property
        
        Friend ReadOnly Property 館內(nèi)借閱分類Column As DataColumn
            Get
                Return Me.column館內(nèi)借閱分類
            End Get
        End Property
        
        Friend ReadOnly Property 總冊數(shù)Column As DataColumn
            Get
                Return Me.column總冊數(shù)
            End Get
        End Property
        
        Friend ReadOnly Property 庫存量Column As DataColumn
            Get
                Return Me.column庫存量
            End Get
        End Property
        
        Friend ReadOnly Property 出版社Column As DataColumn
            Get
                Return Me.column出版社
            End Get
        End Property
        
        Friend ReadOnly Property 書名Column As DataColumn
            Get
                Return Me.column書名
            End Get
        End Property
        
        Public Default ReadOnly Property Item(ByVal index As Integer) As 書籍信息Row
            Get
                Return CType(Me.Rows(index),書籍信息Row)
            End Get
        End Property
        
        Public Event 書籍信息RowChanged As 書籍信息RowChangeEventHandler
        
        Public Event 書籍信息RowChanging As 書籍信息RowChangeEventHandler
        
        Public Event 書籍信息RowDeleted As 書籍信息RowChangeEventHandler
        
        Public Event 書籍信息RowDeleting As 書籍信息RowChangeEventHandler
        
        Public Overloads Sub Add書籍信息Row(ByVal row As 書籍信息Row)
            Me.Rows.Add(row)
        End Sub
        
        Public Overloads Function Add書籍信息Row(ByVal 書號 As String, ByVal 叢書系列 As String, ByVal 作者 As String, ByVal 責(zé)任編輯 As String, ByVal 字?jǐn)?shù) As Integer, ByVal 定價 As Decimal, ByVal 出版時間 As Date, ByVal 主題分類 As String, ByVal 二級分類 As String, ByVal 館內(nèi)借閱分類 As Integer, ByVal 總冊數(shù) As String, ByVal 庫存量 As Integer, ByVal 出版社 As String, ByVal 書名 As String) As 書籍信息Row
            Dim row書籍信息Row As 書籍信息Row = CType(Me.NewRow,書籍信息Row)
            row書籍信息Row.ItemArray = New Object() {書號, 叢書系列, 作者, 責(zé)任編輯, 字?jǐn)?shù), 定價, 出版時間, 主題分類, 二級分類, 館內(nèi)借閱分類, 總冊數(shù), 庫存量, 出版社, 書名}
            Me.Rows.Add(row書籍信息Row)
            Return row書籍信息Row
        End Function
        
        Public Function GetEnumerator() As System.Collections.IEnumerator Implements System.Collections.IEnumerable.GetEnumerator
            Return Me.Rows.GetEnumerator
        End Function
        
        Public Overrides Function Clone() As DataTable
            Dim cln As 書籍信息DataTable = CType(MyBase.Clone,書籍信息DataTable)
            cln.InitVars
            Return cln
        End Function
        
        Protected Overrides Function CreateInstance() As DataTable
            Return New 書籍信息DataTable
        End Function
        
        Friend Sub InitVars()
            Me.column書號 = Me.Columns("書號")
            Me.column叢書系列 = Me.Columns("叢書系列")
            Me.column作者 = Me.Columns("作者")
            Me.column責(zé)任編輯 = Me.Columns("責(zé)任編輯")
            Me.column字?jǐn)?shù) = Me.Columns("字?jǐn)?shù)")
            Me.column定價 = Me.Columns("定價")
            Me.column出版時間 = Me.Columns("出版時間")
            Me.column主題分類 = Me.Columns("主題分類")
            Me.column二級分類 = Me.Columns("二級分類")
            Me.column館內(nèi)借閱分類 = Me.Columns("館內(nèi)借閱分類")
            Me.column總冊數(shù) = Me.Columns("總冊數(shù)")
            Me.column庫存量 = Me.Columns("庫存量")
            Me.column出版社 = Me.Columns("出版社")
            Me.column書名 = Me.Columns("書名")
        End Sub
        
        Private Sub InitClass()
            Me.column書號 = New DataColumn("書號", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column書號)
            Me.column叢書系列 = New DataColumn("叢書系列", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column叢書系列)
            Me.column作者 = New DataColumn("作者", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column作者)
            Me.column責(zé)任編輯 = New DataColumn("責(zé)任編輯", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column責(zé)任編輯)
            Me.column字?jǐn)?shù) = New DataColumn("字?jǐn)?shù)", GetType(System.Int32), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column字?jǐn)?shù))
            Me.column定價 = New DataColumn("定價", GetType(System.Decimal), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column定價)
            Me.column出版時間 = New DataColumn("出版時間", GetType(System.DateTime), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column出版時間)
            Me.column主題分類 = New DataColumn("主題分類", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column主題分類)
            Me.column二級分類 = New DataColumn("二級分類", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column二級分類)
            Me.column館內(nèi)借閱分類 = New DataColumn("館內(nèi)借閱分類", GetType(System.Int32), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column館內(nèi)借閱分類)
            Me.column總冊數(shù) = New DataColumn("總冊數(shù)", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column總冊數(shù))
            Me.column庫存量 = New DataColumn("庫存量", GetType(System.Int32), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column庫存量)
            Me.column出版社 = New DataColumn("出版社", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column出版社)
            Me.column書名 = New DataColumn("書名", GetType(System.String), Nothing, System.Data.MappingType.Element)
            Me.Columns.Add(Me.column書名)
            Me.column書號.AllowDBNull = false

?? 快捷鍵說明

復(fù)制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频
国产欧美一区视频| 91精品国产高清一区二区三区蜜臀| 久久婷婷国产综合精品青草 | 在线中文字幕一区| 亚洲精品福利视频网站| 在线免费观看一区| 偷窥少妇高潮呻吟av久久免费| 欧美日韩一区高清| 天堂va蜜桃一区二区三区漫画版| 911精品国产一区二区在线| 日韩精品一二三| 亚洲精品在线网站| av网站免费线看精品| 亚洲免费在线看| 6080午夜不卡| 国产精品白丝jk黑袜喷水| 中文字幕在线不卡一区| 精品视频免费在线| 久久不见久久见中文字幕免费| 久久久国产精品不卡| 99国产精品久久久久久久久久久| 亚洲h动漫在线| www精品美女久久久tv| 97久久人人超碰| 日韩国产一二三区| 中文字幕国产一区| 8v天堂国产在线一区二区| 久久66热偷产精品| 亚洲男人都懂的| 精品国产亚洲一区二区三区在线观看| 国产成人在线免费| 亚洲成人777| 久久久不卡影院| 欧美日韩免费在线视频| 国产夫妻精品视频| 亚洲123区在线观看| 国产欧美综合在线| 91精品国产麻豆国产自产在线| 成人免费视频播放| 99综合电影在线视频| 日韩精品1区2区3区| 中文字幕中文字幕中文字幕亚洲无线| 欧美三级视频在线| 成人爱爱电影网址| 麻豆成人av在线| 亚洲国产精品久久久久秋霞影院| 国产欧美一区二区精品忘忧草 | 色悠悠久久综合| 激情综合色播五月| 亚洲一区二区三区三| 欧美激情一区二区三区蜜桃视频 | 国产精品系列在线播放| 日韩电影在线观看一区| 亚洲人xxxx| 国产精品丝袜久久久久久app| 日韩一区二区电影在线| 在线区一区二视频| www.亚洲精品| 丁香五精品蜜臀久久久久99网站| 青青国产91久久久久久 | 99精品视频一区二区| 国产麻豆午夜三级精品| 免费成人在线网站| 五月天网站亚洲| 亚洲欧美区自拍先锋| 国产精品免费av| 国产亚洲一本大道中文在线| 日韩免费一区二区| 日韩一二三区不卡| 欧美精品在线观看播放| 欧美视频一区二区三区四区| 色狠狠综合天天综合综合| 东方欧美亚洲色图在线| 国产乱人伦精品一区二区在线观看| 日韩av网站免费在线| 婷婷丁香久久五月婷婷| 五月综合激情日本mⅴ| 亚洲3atv精品一区二区三区| 亚洲香蕉伊在人在线观| 亚洲一区二区三区四区在线免费观看 | 国产不卡高清在线观看视频| 久久99精品久久久久久国产越南 | 成人综合在线观看| 国产精品1024久久| 国产成人三级在线观看| 国产成a人无v码亚洲福利| 国产一区在线精品| 国产精品系列在线播放| 粉嫩一区二区三区性色av| 成人蜜臀av电影| 99久久精品国产麻豆演员表| 91免费观看在线| 欧美丝袜丝交足nylons图片| 欧美日韩成人综合| 欧美刺激午夜性久久久久久久| 欧美tickling网站挠脚心| 精品国产sm最大网站| 国产欧美精品区一区二区三区| 亚洲国产成人在线| 亚洲精选免费视频| 天天影视涩香欲综合网 | 亚洲九九爱视频| 亚洲午夜精品在线| 免费成人性网站| 国产精品亚洲а∨天堂免在线| 粗大黑人巨茎大战欧美成人| 在线一区二区视频| 欧美一级黄色大片| 国产精品免费久久久久| 亚洲一区av在线| 毛片不卡一区二区| 欧美一区二区美女| 国产精品视频在线看| 亚洲国产一区二区视频| 久久91精品国产91久久小草| 99精品一区二区三区| 6080yy午夜一二三区久久| 亚洲精品在线一区二区| 亚洲精品国产无天堂网2021| 日本aⅴ亚洲精品中文乱码| 国产成人亚洲精品青草天美| 在线观看欧美黄色| 久久色在线视频| 亚洲国产日韩在线一区模特| 国内精品在线播放| 色天天综合久久久久综合片| 欧美成人一区二区| 亚洲一区在线观看网站| 国产一区二区三区不卡在线观看 | 一区二区高清视频在线观看| 久久精品国产一区二区三区免费看| 成人晚上爱看视频| 欧美一个色资源| 一区二区三区日韩欧美精品| 国产久卡久卡久卡久卡视频精品| 欧美午夜宅男影院| 国产精品久久久久桃色tv| 毛片一区二区三区| 欧美日韩一区二区欧美激情| 国产精品二三区| 韩国v欧美v亚洲v日本v| 精品视频在线免费看| 亚洲欧洲三级电影| 国产精品系列在线观看| 制服丝袜亚洲网站| 亚洲国产中文字幕| 99re成人精品视频| 国产亚洲精品aa午夜观看| 欧美a一区二区| 精品视频在线视频| 亚洲欧美日韩中文字幕一区二区三区| 久久国产三级精品| 在线不卡一区二区| 亚洲自拍偷拍欧美| 色婷婷久久一区二区三区麻豆| 欧美国产日韩亚洲一区| 韩国午夜理伦三级不卡影院| 91精品在线观看入口| 午夜精品久久久久久久99水蜜桃 | 日韩主播视频在线| 欧美亚洲国产怡红院影院| 综合久久一区二区三区| 成人精品gif动图一区| 久久精品视频在线看| 国产精品99久久久久久久女警| 欧美一级免费大片| 欧美a一区二区| 日韩午夜在线观看视频| 日产欧产美韩系列久久99| 欧美精品久久99久久在免费线| 洋洋av久久久久久久一区| 欧美在线三级电影| 亚洲777理论| 91精品国产乱| 精品写真视频在线观看| 精品福利二区三区| 国产一区视频在线看| 国产欧美精品一区| 成人免费观看av| www.在线成人| 1024亚洲合集| 欧美综合天天夜夜久久| 亚洲电影视频在线| 这里只有精品免费| 极品瑜伽女神91| 国产欧美中文在线| 91久久精品一区二区三| 午夜精品久久一牛影视| 欧美成人一区二区三区片免费| 国产一区二区不卡在线 | 国产麻豆视频一区二区| 欧美国产精品中文字幕| 91免费精品国自产拍在线不卡| 亚洲一区二区三区免费视频| 欧美一区二区人人喊爽| 国产电影一区二区三区| 亚洲美女少妇撒尿| 日韩一区国产二区欧美三区| 国产成人免费xxxxxxxx| 一区二区三区在线播放|