vb.net数据表浏览 vbnet recordset

VB.NET2005怎么在控件中一条一条的显示数据表的记录

vb.net数据表浏览你可以这样,如果你用 dataGridview 时不是也要查询表嘛,

vb.net数据表浏览我们用datatable/dataset 保存你查询的结果,

然后就可以一条条显示,记录住当前显示的row(行)

eg:你的查询保存 datatable1

第一条时,

vb.net数据表浏览我们就来个 dim dtrow as datarow=datatable.rows(0)

textbox1.text=dtrow.item("字段名")'

...

都是如此

当然也是可能绑定的

CurrencyManager 用于管理显示的行数

textbox.DataBindings.add("属性",data,"字段")

相关问答

Q1: 在vb.net中如何查询MDB数据库的数据

以下是完整模块

Imports

System.Data

Imports

System.IO

Imports

System.Data.OleDb

Module

Module1

Public

cn

As

New

OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data

Source="

Application.StartupPath

"\mdb数据库名字.mdb")

'定义连接

Public

DataBaseRST

As

Integer

'用来返回数据库执行结果

Public

Function

DataModify(ByVal

str

As

String)

As

Boolean

'进行数据库修改操作

Dim

cmdinsert

As

New

OleDbCommand

Try

cmdinsert.CommandText

=

str

cmdinsert.Connection

=

cn

If

cn.State

=

ConnectionState.Closed

Then

cn.Open()

DataBaseRST

=

cmdinsert.ExecuteNonQuery()

'用来返回执行的结果

cn.Close()

Return

True

Catch

ex

As

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

Public

Function

Search(ByVal

str

As

String,

ByVal

DGV

As

DataGridView)

As

Boolean

'查询

str---查询命令，DGV---DataGridView，用来显示数据的控件

Dim

tb

As

New

DataTable

Try

Dim

ap

As

New

OleDb.OleDbDataAdapter(str,

cn)

ap.Fill(tb)

DGV.DataSource

=

tb

Return

True

Catch

ex

As

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

End

Module

'以下是调用方法

DataModify("

insert

into

aa

values

('1','2')")'-------这里是数据库更新操作

Search("select

bb

from

aa",DataGridView1)'-----------这里是数据表查询操作

Q2: 请问vb.net如何获取网页表格中的数据

用正则表达式吧vb.net数据表浏览，首先导入命名空间System.Text.RegularExpressionsvb.net数据表浏览，用Webbrowser载入页面，使用vb.net的代码如下：

Dim iTable As String = WebBrowser1.Document.Body.InnerHtml

Dim str_xm1 As String = Regex.Match(Regex.Matches(iTable, "td.*?/td").Item(6).Value, ".*?").Value

这样str_xm1就是你要的内容。

Q3: 菜鸟急求高手指点！！！vb.net2008中把数据库的表读到datagridview中显示

添加一个DataGridView控件，在控件右上的小三角型点一下，选择数据源--添加数据源--(数据库)下一步--新建联接--(浏览一个已存在的数据库文件)确定--下一步(可选不复制)--下一步--数据集包含数据库对象选择表中你的自定义表名(希望显示的表)--完成

上面完成启动调试就能把数据库的表读到datagridview中显示

添加下面代码到代码项就能单击datagridview中记录时textbox中同步显示

Private Sub DataGridView1_CellMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseClick

TextBox1.Text = DataGridView1.SelectedCells(0).Value

End Sub

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

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

如果必须要做vb.net数据表浏览，你可以这样：按排序规则，取到健列表。保存到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

Q5: vb.net2005连接数据库时没有显示浏览access数据库文件对话框

创建数据库

选择开始菜单中→程序→【Management SQL Server 2008】→【SQL Server Management Studio】命令，打开【SQL Server Management Studio】窗口，并使用Windows或 SQL Server身份验证建立连接。

在【对象资源管理器】窗口中展开服务器，然后选择【数据库】节点

右键单击【数据库】节点，从弹出来的快捷菜单中选择【新建数据库】命令。

执行上述操作后，会弹出【新建数据库】对话框。在对话框、左侧有3个选项，分别是【常规】、【选项】和【文件组】。完成这三个选项中的设置会后，就完成了数据库的创建工作，

在【数据库名称】文本框中输入要新建数据库的名称。例如，这里以“新建的数据库”。

在【所有者】文本框中输入新建数据库的所有者，如sa。根据数据库的使用情况，选择启用或者禁用【使用全文索引】复选框。

在【数据库文件】列表中包括两行，一行是数据库文件，而另一行是日记文件。通过单击下面的【添加】、【删除】按钮添加或删除数据库文件。

切换到【选项页】、在这里可以设置数据库的排序规则、恢复模式、兼容级别和其他属性。

切换到【文件组】页，在这里可以添加或删除文件组。

完成以上操作后，单击【确定】按钮关闭【新建数据库】对话框。至此“新建的数据”数据库创建成功。新建的数据库可以再【对象资源管理器】窗口看到。

关于vb.net数据表浏览和vbnet recordset的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。