以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  DropFormName  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193575)
--  作者：1234567
--  发布时间：2024/9/26 14:40:00
--  DropFormName

Dim txt As String = e.Form.Controls("DropBox1").Text
txt = "\'" & txt & "\'"
msgbox(txt)
e.Form.Controls("DropBox2").DropFormName = txt   为什么代码不可执行？

 

 

\'e.Form.Controls("DropBox2").DropFormName = "申请单位"  代码可执行
--  作者：有点蓝
--  发布时间：2024/9/26 14:48:00
--  
不是什么地方都要加单引号的。除了表达式，以及sql。正常的代码都不需要加单引号
--  作者：1234567
--  发布时间：2024/9/26 16:31:00
--  

.NET Framework 版本：4.0.30319.1
Foxtable 版本：2022.8.18.1
错误所在事件：窗口,列名,TreeView1,NodeMouseClick
详细错误信息：
Specified argument was out of the range of valid values.
Parameter name: index

 

If Forms ("查询表").opened Then
    If e.Node.Level = 1 Then
        e.Form.DropDownBox.Value = e.Node.Text
        MessageBox.Show(1)
        Forms ("查询表").Controls("DropBox1").text = e.Node.Nodes(0).Text
        MessageBox.Show(2)
        e.Form.DropDownBox.CloseDropdown()
    End If
End If
--  作者：有点蓝
--  发布时间：2024/9/26 16:34:00
--  
当前点击的节点，没有子节点
--  作者：1234567
--  发布时间：2024/9/26 16:41:00
--  

我想把当前节点的父节点的数据引入到Forms ("查询表").Controls("DropBox1")，代码怎么写？

[此贴子已经被作者于2024/9/26 16:42:52编辑过]
--  作者：有点蓝
--  发布时间：2024/9/26 16:48:00
--  
http://www.foxtable.com/webhelp/topics/1498.htm