VB.NET中treeview使⽤⽅法⼆与access数据库的数据绑定1、⾸先建⽴⼀个数据库，名字为shiyan 完整的数据库名字为shiyan.mdb 在⾥⾯建⼀个表，名字为genjiediantable01并设计表，添加两个字段分为：1、字段名称：id 数据属性：⾃动编号，2、数据属性：gjdmz ⽂本 如下图：
2、把这个数据库放在E盘下，视个⼈情况⽽定，关键是这个数据库所在的路径
3、打开VS.2005 在设计区添加treeview控件，默认名字为treeview1 如下图
4、点击项⽬——引⽤——COM 添加 如下图：
5、在控件上点击右键选择查看代码：并输⼊代码如下图：
Public Class Form1
Dim myconnection As New OleDb.OleDbConnection()
Dim MyAdapater As New OleDb.OleDbDataAdapter()
Dim mycommand As New OleDb.OleDbCommand()
Dim ds As New DataSet()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load        myconnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\shiyan.mdb"
mycommand.CommandText = "select id,gjdmz from genjiediantable01"
mycommand.Connection = myconnection
Try
myconnection.Close()
myconnection.Open()
Dim mysqlreader As OleDb.OleDbDataReader = mycommand.ExecuteReader
TreeView1.Nodes.Clear()
While mysqlreader.Read()
Dim tree_root As New TreeNode()
tree_root.Tag = mysqlreader.GetValue(0)
tree_root.Text = mysqlreader.GetString(1)
TreeView1.Nodes.Add(tree_root)
End While
Finally
myconnection.Close()
End Try
TreeView1.ExpandAll()
TreeView1.Select()
End Sub
End Class
F5 运⾏调试出现下图
代码分析：全⽂的精华
1、定义公⽤变量
Dim myconnection As New OleDb. ‘连接Access数据库，则可以使⽤OleDB来实现。定义⼀个数据库连接，表⽰到数据源的连接是打开的。
Dim ds As New 定义⼀个数据集，与数据库的表相对应
Dim MyAdapater As New OleDb. 定义⼀个数据库接⼝ 相关内容在
Dim mycommand As New OleDb. ’定义数据库连接命令
明天再分析，有点累了！
接着昨天的分析
myconnection. = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\shiyan.mdb" '数据库连接字串
mycommand. = "select id,gjdmz from genjiediantable01" ’数据库连接命令 意思是在表中genjiediantable01中查询所有根结点的编号和名称，对应的是id,gjdmz 两个字段mysql下载的vs库放在那个文件里
mycommand. = myconnection 连接数据库并执⾏相关的命令
Try
myconnection. ‘关闭到数据源的连接
myconnection.’连接池中提取⼀个打开的连接（如果有可⽤的连接）。否则，它就建⽴⼀个到数据源的新连接
Dim mysqlreader As OleDb. = mycommand. ‘将 CommandText 发送到 Connection 并⽣成⼀个 OleDbDataReader。 TreeView1.Nodes.
While mysqlreader.‘OleDbDataReader 的默认位置在第⼀条记录前⾯。因此，必须调⽤ Read 来开始访问任何数据
Dim tree_root As New TreeNode()’ 定义⼀个表⽰ 控件中的节点。
tree_root.Tag = mysqlreader.把编号放⼊tag中
tree_root.Text = mysqlreader.’树上显⽰的是根节点名称gjdmz
TreeView1.Nodes.(tree_root)
End While
Finally
myconnection.
End Try
TreeView1. '打开树中的每个节点
TreeView1. '选择 TreeView

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。