VB.NET的定位DataGride中行的问题

jijiandong

我是新手 最近做了一个小型的MIS
原来提供的修改功能是必须从DataGrid3中选取行再行修改的
因为前台提供用户修改密码
所以在显示的时候DataGrid3是隐藏的 这样就不能进行选取了
所以必须提前定位到该用户所在的行以下是我的方法但是读来读取读的都是第一行的数据请高手帮忙

Private Sub newa()
       '定义
        Dim olecn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\data\Clients.mdb")
        Dim olecm As New OleDbCommand("select * from StudentUser", olecn)
        Dim olead As New OleDbDataAdapter
        Dim olerd As OleDbDataReader
        Dim pd As Boolean = False '定义boolean为后面错误处理使用
        Dim i As Integer
        olecm = New OleDbCommand("select * from StudentUser", olecn)
        '与数据库建立连接
        olecn.Open()
        olerd = olecm.ExecuteReader
        '循环判断与数据库中数据是否相同



        Do While olerd.Read()
            For i = 0 To olerd.FieldCount - 1
                If Trim(login.zhtl.Text) = (olerd.Item("Usename")) Then
                    Me.DataGrid3.CurrentRowIndex = i
                  

                    Exit Sub
                End If
            Next
        Loop
      


    End Sub

kobekiller

datagrid中的行是从1开始的 ，你的i是从0开始计算的，你把me.datagrid3.currentrowindex=i
换成me.datagrid3.currentrowindex=i+1 试试

jijiandong

顶好象还不行

自然啊

me.datagrid3.CurrentCell.RowNumber=i

jijiandong

me.datagrid3.CurrentCell.RowNumber=i
改过了
提示 错误        13        表达式是一个值，因此不能作为赋值目标。       

jijiandong

等待高人

jijiandong

继续等待

agressive

FieldCount 是有多少列，不明白你这么循环有什么用
Do While olerd.Read()
    If Trim(login.zhtl.Text) = (olerd.Item("Usename")) Then
        Me.DataGrid3.CurrentRowIndex = i
           Exit Sub
      End If
      i+=1
Loop

jijiandong

问题解决了
感谢这位前辈
我原来以为那是调用行的.....因为是初学所以对很多对象不是了解...
如果我对datagraid了解的再多点那就好了.