各位新年好!
Dim a As String = MainTable.Name
Dim b As DataRow = DataTables("基础设置").Find("[主表] = '" & a & "'")
Dim c As String = ConfigBar.Items("组合框1").Text.SubString(0,3)
Dim d As WinForm.TreeView = Forms("'" & b("窗口") & "'").Controls("TreeView1")
d.BuildDataTree("定额库","定额 = '" & c & "'","章","节","W")上面的代码中红色部分有问题,想要打开窗口1中的目录树,出现下面窗口:
此主题相关图片如下:窗口.jpg