扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
作者:liyu 来源:yesky 2007年11月8日
关键字: Windows
Private Sub DataGrid1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataGrid1.SelectedIndexChanged Dim dv As DataView = SelectTable.DefaultView() Dim dr As DataRow = SelectTable.NewRow() Dim ID, index As String Dim Name As String Label1.Visible = False index = DataGrid1.SelectedIndex() ID = DataGrid1.Items(index).Cells(1).Text dv.RowFilter = "ID='" + ID + "'" If dv.Count > 0 Then ' Response.Write(". 你已经选择了该行!") Label1.Visible = True Exit Sub End If dv.RowFilter = "" Name = DataGrid1.Items(index).Cells(2).Text dr(0) = ID dr(1) = Name SelectTable.Rows.Add(dr) Data2bind() End Sub |
向列集添加了一个新的列类型 ButtonColumn。该列在每行中生成 LinkButton,用于选择该行,而不是从该页进行浏览。列的 Command 属性设定为 Select。DataGrid 将 Select 作为一个标准命令,将包含被单击按钮的列选定。当用户选择该行时,先取得该行的值,如果该行已选择则提示信息,我们用过虑条件实现,所选择的行插入一临时表,且在另一DataGrid中显示。注意过虑之后应该设置过虑为空,否则得不到结果。
第 4 步: 删除
DataGrid 控件支持标准的列集,它提供一些基础的操作。诸如 BoundColumn、 ButtonColumn 和 TemplateColumn。我们利用ButtonColumn列实现删除功能。
… Private Sub DataGrid2_DeleteCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid2.DeleteCommand Dim dv As DataView = SelectTable.DefaultView() Dim ID As String ID = e.Item.Cells(1).Text dv.RowFilter = "ID='" + ID + "'" If dv.Count > 0 Then dv.Delete(0) dv.RowFilter = "" Data2bind() End Sub |
第 5 步: 分页
设置DataGrid的分页方法有二种,一种是数字分页人,另一种是上下分页。实现方法是在属性栏中设置AutoPaging为true,在其属性生成器中设置分页类型。
结论
DataGrid 控件简化了多个常见 Web 应用情形,其中包括只读报表到交互式应用程序 UI。该控件优于传统的 ASP 编程。它将转换对象模型操作和数据绑定所需的逻辑封装进与浏览器无关的 HTML 表现功能。还将处理回传数据以及转换客户机事件的详细资料封状进服务器事件。
该控件设计用于无须作出太多开发努力就可以表现您的数据。随着应用要求的改变,以及您开始使用 DataGrid 的各种功能,您可以逐步添加其它功能。
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者