以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于目录树NodeMouseClick事件代码的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147106)

--  作者:温馨的大树
--  发布时间:2020/3/10 0:14:00
--  关于目录树NodeMouseClick事件代码的问题
1、下拉窗口的afterload代码如下:
Dim trv As  WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(DataTables("行政区划表"),"省份|市")

2、NodeMouseClick事件代码如下
If e.Node.Level = 1 Then
    Dim tr As  Row = Tables("订单明细表").Current
    Dim dr As DataRow = e.Node.DataRow
    tr("省份") = dr("省份")
    tr("城市") = dr("市")
    e.Form.DropDownBox.Value = tr("城市")
    e.Form.DropDownBox.CloseDropdown()
End If

执行后报错,什么原因啊?要怎么处理呢?

--  作者:温馨的大树
--  发布时间:2020/3/10 0:15:00
--  回复:(温馨的大树)关于目录树NodeMouseClick事件代...

图片点击可在新窗口打开查看此主题相关图片如下:万能五笔截图_20200310000707.png
图片点击可在新窗口打开查看

--  作者:温馨的大树
--  发布时间:2020/3/10 0:17:00
--  回复:(温馨的大树)关于目录树NodeMouseClick事件代...
补充说明一下,同时下垃窗口也不会自动关闭
--  作者:有点蓝
--  发布时间:2020/3/10 8:56:00
--  
看是哪一句代码出错,调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm