Foxtable(狐表)用户栏目专家坐堂 → [求助]getcomboliststring结果中去掉特定值


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

主题:[求助]getcomboliststring结果中去掉特定值

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/6 21:17:00 [显示全部帖子]

 

s = DataTables("学生综合素质表").GetComboListString("姓名","[班级]= '" & banj & "' and [学年]= '" & xuenian & "' and 姓名 not in ('张三', '李四')","学号")

 

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/2 17:33:00 [显示全部帖子]

s = DataTables("学生综合素质表").GetComboListString("姓名","[班级]= '" & banj & "' and [学年]= '" & xuenian & "' and 姓名 not Like '张%'","学号")

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/3 9:24:00 [显示全部帖子]

Dim gydw As String = e.Form.Controls("ComboBox3").value 
Dim gnq As String = RibbonTabs.SelectedTab.Name   '---定义gnq是功能区的名称
If gnq = "乡镇敬老院人员信息系统" Then  '---如果功能区名称是乡镇集中供养人员信息系统
    e.sender.ComboList = DataTables("乡镇及供养单位词典").SQLGetComboListString("乡镇供养单位","乡镇供养单位 Like '%" & gydw & "%'" & " And 乡镇供养单位 Like '%敬老院%'")
ElseIf gnq = "村级养老点人员信息系统" Then
    e.sender.ComboList = DataTables("乡镇及供养单位词典").SQLGetComboListString("乡镇供养单位","乡镇供养单位 Like '%" & gydw & "%'" & " And 乡镇供养单位 Not Like '%敬老院%'")
End If

 回到顶部