vbnet中gridview的使用

vbnet中gridview的使用

ID:13192201

大小:35.00 KB

页数:4页

时间:2018-07-21

vbnet中gridview的使用_第1页
vbnet中gridview的使用_第2页
vbnet中gridview的使用_第3页
vbnet中gridview的使用_第4页
资源描述:

《vbnet中gridview的使用》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、VB.NET版的GridView经典使用 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load        If Not IsPostBack Then            binddata()        End If    End Sub    Public Sub binddata()    '    End Sub    '编辑中    Protected Sub GridView1_RowEdi

2、ting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewEditEventArgs) Handles GridView1.RowEditing        GridView1.EditIndex = e.NewEditIndex        '当前编辑行背景色高亮        GridView1.EditRowStyle.BackColor = Color.FromName("#F7CE90")        binddata()    End

3、 Sub    '分页    Protected Sub GridView1_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles GridView1.PageIndexChanging        GridView1.PageIndex = e.NewPageIndex        binddata() '重新绑定GridView数据的函数    End Sub    '

4、更新    Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating        Dim clsB As New sqlDLTP.business        Dim sqlstr As String        Dim ds As New DataSet        sqlstr = "s

5、elect hbdwno from etsshbd where hbdcnm='" & CType(GridView1.Rows(e.RowIndex).FindControl("TextBox1"), TextBox).Text.ToString().Trim() & "'"        ds = clsB.queryitems(sqlstr)        Dim wno As String = ds.Tables(0).Rows(0)(0).ToString().Trim()        sqlstr = "update etsd

6、l set okscore1='" & _        CType(GridView1.Rows(e.RowIndex).FindControl("TextBox6"), TextBox).Text.ToString().Trim() & "',okscore2='" & _        CType(GridView1.Rows(e.RowIndex).FindControl("TextBox7"), TextBox).Text.ToString().Trim() & "',okscore='" & _        CType(Gri

7、dView1.Rows(e.RowIndex).FindControl("TextBox8"), TextBox).Text.ToString().Trim() & "',okreport='" & _        CType(GridView1.Rows(e.RowIndex).FindControl("TextBox9"), TextBox).Text.ToString().Trim() & "',okgrad='" & _        CType(GridView1.Rows(e.RowIndex).FindControl("Te

8、xtBox10"), TextBox).Text.ToString().Trim() & "',memo='" & _        CType(GridView1.Rows(e

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。