关于vb.net使用记录集的信息

vb.net 去的字段的值 rs.fields().value

在.net里是不对的。

服务器控件里面你要读取表里面的东西，你需要是使用例如gridview之类的数据控件。然后用gridview.rows(i).cells(j)取值。

相关问答

Q1: vb.net 如何对数据库查询结果记录集排序？

加了单引号就是一个常量字符串了，对于每一行都是一样的

像这种放在最前面的字段，order by 1 就可以了

Q2: vb.net报表设置记录行数

Visualbasic代码编辑器没有这个功能，但可以用第三方的编辑软件Emedit来实现这个功能。

1、用Emedit打开*.frm文件。

2、点工具，当前配置属性，然后勾选显示行号即可。

Q3: VBNET如何移动记录集的记录指针?

可以先对数据库中的表数据进行正序排列，然后打印结果的时候将print放在循环外。

如：test表中有如下数据

现在要用游标取出最后一条，也就是“5，孙七”这条。

代码如下：

declare @id int --定义变量

declare @name varchar(10) --定义变量

declare cur_c cursor for select * from test order by id --定义游标

open cur_c --打开游标

fetch next from cur_c into @id,@name --取游标值到变量

while @@fetch_status = 0 --循环退出条件

begin --循环开始

fetch next from cur_c into @id,@name  --继续取游标值到变量

end --循环结束

print cast(@id as varchar)+','+@name --打印最后一条结果

close cur_c --关闭游标

deallocate cur_c --释放游标

结果如图：

Q4: vb.net 注册问题

改为：

sql = "insert into 表1 values(用户名='" TextBox1.Text "' ,密码='" TextBox2.Text "')"

Q5: 在vb.net中怎样浏览首记录 、上一条、下一条、尾记录、和数据库access 绑定的

一般，我都不喜欢做这样报上一条下一条，太专业的数据库操作不适合终端用户。

如果必须要做，你可以这样：按排序规则，取到健列表。保存到list中，上下条，只是改变一索引而已。

Imports System.Data.OleDb

Class BindNavigate

Dim cnn As OleDb.OleDbConnection '打开连接略

Dim lst As New List(Of Integer)

Sub New()

lst = New List(Of Integer)

index = -1

Using da As New OleDbDataAdapter("select id from mytable order by abc,def", cnn), tb As New DataTable

da.Fill(tb)

For Each row As DataRow In tb.Rows

Dim n As Integer = row(0)

lst.Add(n)

Next

If tb.Rows.Count 0 Then CurrentIndex = 0

End Using

End Sub

Dim index As Integer Event CurrentIndexChanged()

Property CurrentIndex As Integer

Get

Return index

End Get

Set(ByVal value As Integer)

Dim b As Boolean = value index

index = value

If b Then RaiseEvent CurrentIndexChanged()

End Set

End Property

'当前的键值

ReadOnly Property CurrentValue As Integer

Get

Return lst(index)

End Get

End Property

Sub MoveFirst()

CurrentIndex = 0

End Sub

Sub MovePrevious()

CurrentIndex -= 1

End Sub

Sub MoveNext()

CurrentIndex += 1

End Sub

Sub MoveLast()

CurrentIndex = lst.Count - 1

End Sub

ReadOnly Property BOF

Get

Return CurrentIndex = 0

End Get

End Property

ReadOnly Property EOF

Get

Return CurrentIndex = lst.Count - 1

End Get

End Property

Private Sub Text_CurrentIndexChanged() Handles Me.CurrentIndexChanged

'绑定过程

End Sub

End Class