vb.net树形目录代码,c# 目录树

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

VB.net怎么制作树形菜单啊？

你说的“树形菜单”是指下拉菜单（可以有子菜单）吗？如果是，VB.net提供了MenuStrip控件，在工具箱里能找到，直接就在对应位置打字就可以了，完全是“所见即所得”。

相关问答

Q1: vb.net从数据库读取信息填充treeview做成层次目录怎么做

给你一段我曾经写的代码，主要是生成TreeView的节点！有什么不懂的地方你就提！

Public Sub InitializeTreeView(ByVal strvXL As TreeView, ByVal vrsRecordTwo As DataSet)

Dim treBaseNodeOne As TreeNode

Dim treBaseNodeTwo As TreeNode

Dim strDWDM As String

m_rsRecordTwo = g_clsSybase.SelectSC_PD_SBCSB1()

'查找供电局信息

g_clsSybase.SelectRS_ZZJG_ZZJGDMB(m_rsRecordOne)

'添加根节点

Do While m_rsRecordOne.Read

strDWDM = m_rsRecordOne.GetString(0) '获取单位代码

treBaseNodeOne = New TreeNode

treBaseNodeOne.Text = m_rsRecordOne.GetString(1).Trim() '获取单位名称

treBaseNodeOne.Name = m_rsRecordOne.GetString(1)

treBaseNodeOne.Tag = ""

strvXL.Nodes.Add(treBaseNodeOne)

'添加树结构第二层

Dim drsTwo() As DataRow

drsTwo = m_rsRecordTwo.Tables(0).Select("SSDW='" strDWDM "' and SC__XLBM is null")

For Each dr As DataRow In drsTwo

treBaseNodeTwo = New TreeNode

treBaseNodeTwo.Text = dr.Item("XLMC").ToString.Trim

treBaseNodeTwo.Name = dr.Item("XLMC")

treBaseNodeTwo.Tag = dr.Item("XLBM")

treBaseNodeOne.Nodes.Add(treBaseNodeTwo)

Loop

m_rsRecordOne.Close()

End Sub

Q2: 在VB.NET中，使用Treeview列出指定目录下的子文件夹和子文件夹中的文件

建一个ImageList控件，右击，属性，在“图像”里插入图片（你的1.gif），看好他们的索引（Index，默认是1）。然后，代码如下。＝＝＝＝＝＝＝＝＝＝＝＝ Private Sub Command1_Click() TreeView1.ImageList = ImageList1 '关联Treeview1与Imagelist1 TreeView1.LineStyle = tvwRootLines Dim nodX As Node TreeView1.Nodes.Add , , "a1", "teachername" Set nodX = TreeView1.Nodes.Add("a1", tvwChild, , "教师姓名", 1) '这个1的意思是刚才设置的图片在ImageList里的索引 End Sub

Q3: vb6.0里怎么使用TREEVIEW目录树?

'设置 Treeview 控件属性。

TreeView1.LineStyle = tvwRootLines ' Linestyle 1

'添加 Node 对象。

Dim nodX As Node '声明 Node 变量。

'带有文本 'Root' 的第一个节点。

Set nodX = TreeView1.Nodes.Add(, , "r", "班级名称")

'下一个节点是节点 1 ("Root") 的子节点。

Call TreeView1.Nodes.Add("r", tvwChild, "class2007", "2007级")

Call TreeView1.Nodes.Add("r", tvwChild, "class2008", "2008级")

Call TreeView1.Nodes.Add("r", tvwChild, "class2009", "2009级")

Q4: vb6.0中怎么制作目录树？