昨天在Csdn回答一位朋友的问题时,恰巧碰到这样的问题,我有些疑惑,所以晚上回家就试了一下,后来才发现是自已错啦.在这里我想纠正自已的错误.
DataGrid的分页栏控件的组成及各自的功能
1.DataGrid的分页栏由三个控件组成.分别为:
1.System.Web.UI.WebControls.Label
2.System.Web.UI.LiteralControl
3.System.Web.UI.WebControls.DataGridLinkButton
其中每个控件有每个控件的作用.
##Label负责显示当前页,也就是选择页.
##LiteralControl负责显示一个空格,用来间隔它们之间的距离
##DataGridLinkButton显示连接,用来连接到其它页,如下一页.
这样就可以很轻松地回答昨于那位朋友的问题啦
原题:
[小弟想要做DataGrid,什么效果呢,要分页
1 2 3 4,当我选中第2页时,2的颜色要跟1 3 4不一样。
就像CSDN的分页一样一样一样的啊]
实现:
namespace Text_WebApp
效果图:

DataGrid的分页栏控件的组成及各自的功能
1.DataGrid的分页栏由三个控件组成.分别为:
1.System.Web.UI.WebControls.Label
2.System.Web.UI.LiteralControl
3.System.Web.UI.WebControls.DataGridLinkButton
其中每个控件有每个控件的作用.
##Label负责显示当前页,也就是选择页.
##LiteralControl负责显示一个空格,用来间隔它们之间的距离
##DataGridLinkButton显示连接,用来连接到其它页,如下一页.
这样就可以很轻松地回答昨于那位朋友的问题啦
原题:
[小弟想要做DataGrid,什么效果呢,要分页
1 2 3 4,当我选中第2页时,2的颜色要跟1 3 4不一样。
就像CSDN的分页一样一样一样的啊]
实现:
效果图:
评论
# re: 对DataGrid的分页栏的理解
我常用这样的方法:'突出显示当前页
Dim Item As DataGridItem
Dim ctrl As Control
For Each Item In dg.Controls(0).Controls
If Item.ItemType = ListItemType.Pager Then
For Each ctrl In Item.Cells(0).Controls
If ctrl.GetType.ToString = "System.Web.UI.WebControls.Label" Then
If CType(ctrl, Label).Text = (dg.CurrentPageIndex + 1).ToString Then
CType(ctrl, Label).ForeColor = Color.Red
Exit For
End If
End If
Next
End If
Next
CType(ctrl, Label).ForeColor = Color.Red
Exit For
End If
End If
Next
End If
Next