Foxtable(狐表)用户栏目专家坐堂 → [求助] 窗口中下拉列表框如何实现多选?


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

主题:[求助] 窗口中下拉列表框如何实现多选?

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/5/31 21:03:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:eventcode.zip


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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/5/31 21:36:00 [显示全部帖子]

11楼的实例我测试没有问题。认真核对一下代码。或者上传有问题的实例看看

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/6/3 21:10:00 [显示全部帖子]

请上传有问题的实例测试

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/6/4 21:38:00 [显示全部帖子]

去掉参加检测人员TextChanged事件代码

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/6/8 9:03:00 [显示全部帖子]


查询2019-01-05开始已经被安排的人员的记录,然后下拉列表去掉这些人的选项。

如果不会上传具体实例说明

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/6/8 17:32:00 [显示全部帖子]

    Case "任务完成"
        Dim Result As DialogResult
        Result = MessageBox.Show("您确定该任务已经完成并提交么?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If Result = DialogResult.Yes Then
            Tables("任务安排").Current("任务状态")="完成检测"
            Dim str As String = Tables("任务安排").Current("项目负责人")
            If str > "" AndAlso Tables("任务安排").Current.IsNull("参加检测人员") = False
                str = str & "," & Tables("任务安排").Current("参加检测人员")
            End If
            DataTables("人员").ReplaceFor("已占用",True,"姓名 In ('" & str.Replace(",","','")  & "') ")
        End If
        

 回到顶部