最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
翻页的WEB控件
时间：2022-06-30 11:14:42 编辑：袖梨 来源：一聚教程网
总共分三部分：。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
Designer(GetType(ChangePageDesigner)), _
ToolboxData("<{0}:ChangePage runat=server>")> 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 "プロパティ"
Category("ChildControl"), Description("
Imports System.ComponentModel
Imports System.web.UI.HtmlControls
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Data
Imports System.Data.OracleClient
Designer(GetType(ChangePageDesigner)), _
ToolboxData("<{0}:ChangePage runat=server>")> 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 "プロパティ"
Category("ChildControl"), Description("
相关文章
- 蚂蚁森林神奇海洋2026年4月20日答案 05-15
- 胖折叠的终极形态 华为Pura X Max上手评测 05-15
- 2026年4月将从Xbox Game Pass库中移除的所有游戏 05-15
- 《Pragmata》首发销量突破100万份 为全新单机IP注入希望 05-15
- 《Pragmata》两天内销量突破一百万份 05-15
- DNF奇美拉技能链设置推荐 05-15