僅供參考:treeview控件實現
Try
Dim AstrSql As String
Dim Acmd As New SqlCommand
Dim Aadp As New SqlDataAdapter
Dim Adst As New DataSet
'判断是否已打开数据库,如果数据库连接已关闭就打开
If Gcon.State = ConnectionState.Closed Then
'从配置文件中读取连接数据库的字符串
Gcon.ConnectionString = System.Configuration.ConfigurationSettings.AppSettings("VconStr")
Gcon.Open()
End If
'组织查询工号的sql字符串
AstrSql = "select 工号,姓名 from 员工 where not ltrim(工号) is null and 状态='在職'"
Acmd.CommandText = AstrSql
Acmd.Connection = Gcon
Dim Ared As SqlDataReader = Acmd.ExecuteReader
'清除所有节点
Me.treeRenShi.Nodes(0).Nodes.Clear()
'循环所有工号
Dim i As Integer = 0
While Ared.Read
'定义树节点
Dim GHnode As New TreeNode
GHnode.ID = Trim(Ared("工号"))
'使节点文本同时显示员工工号和姓名
GHnode.Text = Trim(GHnode.ID) & " " & Trim(Ared("姓名"))
'为treeview增加节点
Me.treeRenShi.Nodes(0).Nodes.Add(GHnode)
Me.treeRenShi.Nodes(0).Nodes(i).ImageUrl = "Image/Beijing/BeBox Watcher.ico"
i = i + 1
End While
Ared.Close()
'使根节点目录下的所有字节点展开
Me.treeRenShi.Nodes(0).Expanded = True
'组织查询工号的sql字符串
AstrSql = "select 工号,姓名 from 员工 where not ltrim(工号) is null and 状态='離職'"
Acmd.CommandText = AstrSql
'Acmd.Connection = Gcon
Ared = Acmd.ExecuteReader
'清除所有节点
Me.treeRenShi.Nodes(1).Nodes.Clear()
'循环所有工号
i = 0
While Ared.Read
'定义树节点
Dim GHnode As New TreeNode
GHnode.ID = Trim(Ared("工号"))
'使节点文本同时显示员工工号和姓名
GHnode.Text = Trim(GHnode.ID) & " " & Trim(Ared("姓名"))
'为treeview增加节点
Me.treeRenShi.Nodes(1).Nodes.Add(GHnode)
Me.treeRenShi.Nodes(1).Nodes(i).ImageUrl = "Image/Beijing/BeBox Watcher.ico"
i = i + 1
End While
Ared.Close()
'使根节点目录下的所有字节点展开
Me.treeRenShi.Nodes(1).Expanded = False
Ared.Close()
Gcon.Close()
Catch ex As Exception
Me.Response.Write("錯誤提示:" & ex.Message)
End Try
treeview控件實現
最新推荐文章于 2025-11-26 14:12:29 发布
本文介绍了一种使用TreeView控件展示员工在职与离职状态的方法。通过SQL查询获取数据,并利用C#代码动态创建树状结构,展示不同状态的员工信息。此示例包括数据库连接、数据读取及TreeView节点构建等步骤。
831

被折叠的 条评论
为什么被折叠?



