此主题相关图片如下:企业微信截图_20240402215108.png
'Dim dr As DataRow
''''否则在产品表查找同名的产品行,将找到的行赋值给变量dr
'dr = DataTables("表B").Find("[角色] = 'BOOS'")
'Dim Multi As String = dr("配置")
'Dim drs As List(Of DataRow) = DataTables("表A").Select("[窗口] in ('" & Multi.Replace("|", "','") & "')", "菜单")
'For Each drn As DataRow In drs
' If tr.Nodes.Contains(drn("菜单")) Then
' nd = tr.Nodes(drn("菜单"))
' Else
' nd = Tr.Nodes.Add(drn("菜单"), drn("菜单"))
' nd.ForeColor = Color.Red
' '希望子节点按照表A的归属插入到一级节点下
' End If
' nd.Nodes.Add(drn("窗口"), drn("窗口")) 现在希望把drn("窗口")处理成按钮添加到指定的窗口内
'Next
需要筛选 根据角色筛选数据
上面的代码是ok的 现在
[此贴子已经被作者于2024/4/2 21:51:46编辑过]