总共分三部分:。VB,Builder和Design
Imports System.ComponentModel
Imports System.web.UI.HtmlControls
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Data
Imports System.Data.OracleClient
 
ParseChildren(False), PersistChildren(False), _
Designer(GetType(ChangePageDesigner)), _
ToolboxData("<{0}:ChangePage runat=server>{0}:ChangePage>")> Public Class ChangePage
    Inherits System.Web.UI.WebControls.Panel
    Implements INamingContainer
 
    Private WithEvents txtPage As newTextBox
    Private WithEvents btnFirst As newButton
    Private WithEvents btnNext As newButton
    Private WithEvents btnPrevious As newButton
    Private WithEvents btnLast As newButton
    Private WithEvents btnGo As newButton
    Private WithEvents lblNowPage As newLabel
    Private WithEvents lblAllPage As newLabel
    Private WithEvents lblAllItems As newLabel
    Private WithEvents lblPage As newLabel
    Private htmlTabel As Table
    Private htmlRow As TableRow
    Private isCreated As Boolean
    Private mDataGrid As String
 
    Public Event PageIndexChange As EventHandler
 
    Public Sub New()
    End Sub
 
#Region "プロパティ"
                 NotifyParentProperty(True), PersistenceMode(PersistenceMode.InnerProperty), _
             Category("ChildControl"), Description("