读书人

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

发布时间: 2012-01-06 22:55:18 作者: rapoo

VB.NET的定位DataGride中行的问题
我是新手 最近做了一个小型的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


[解决办法]
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

读书人网 >VB Dotnet

热点推荐