Foxtable(狐表)用户栏目专家坐堂 → 选定后就关闭下拉窗口


  共有3216人关注过本帖树形打印复制链接

主题:选定后就关闭下拉窗口

帅哥哟,离线,有人找我吗?
zhuxinhui
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
选定后就关闭下拉窗口  发帖心情 Post By:2020/12/1 18:59:00 [显示全部帖子]

下拉窗口valuechanged事件代码:
Dim dr As DataRow = DataTables("科目表").Find("科目编码='" & e.Sender.Text & "'")
If dr IsNot Nothing Then
    e.Form.Controls("DropBox2").Enabled = dr("货物")   
End If
一选定科目后就自动关闭窗,可不可以选定后不关闭下拉窗口
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20201201185343.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2020/12/2 9:30:00 [显示全部帖子]

DropDownClosed里没有代码也是这样

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2020/12/2 9:54:00 [显示全部帖子]

查到原来了,除了用科目权下拉窗口外都不会关闭,原来是科目树的下拉窗口的问题,具体得查查是哪里出问题了,应该是这个代码有问题
If e.node.nodes.count = 0 Then '最末级   
   Dim tr As Row
   Dim dr As DataRow = DataTables("科目表").find("科目编码='" & e.Node.name & "'") '获取生成此节点的DataRow

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20201202.png
图片点击可在新窗口打开查看

     e.Form.DropDownBox.Value = dr("科目编码") '这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据.
     e.Form.DropDownBox.CloseDropdown()
End If

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2020/12/2 10:03:00 [显示全部帖子]

应该是,它把二个下拉窗口同时关闭了,这二个下拉窗口有什么区别

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2020/12/2 10:35:00 [显示全部帖子]

不是目录树的下拉窗口是没有问题,一用目录树下拉窗口就是这样

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2020/12/2 10:52:00 [显示全部帖子]

按键也不行,我改成只关闭指定的窗口代码也不行,Forms("编码科目表").Close(),只有选择后再点击空白的地方就会自动关闭

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6338 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2020/12/2 11:11:00 [显示全部帖子]

Forms("编码科目表").Close()直接这样也不行


另外我的高级版已过升级期了,到时这个问题应该解决不了了吧


 回到顶部