Foxtable(狐表)用户栏目专家坐堂 → combox的过滤条件问题


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

主题:combox的过滤条件问题

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


加好友 发短信
等级:幼狐 帖子:105 积分:825 威望:0 精华:0 注册:2015/5/19 9:11:00
  发帖心情 Post By:2016/4/7 10:59:00 [只看该作者]

恩,


Dim auditopinions As List(Of String)
For m As Integer = 0 To strsn.Length - 1
    auditopinions = DataTables("audit").GetValues("auditopinion"," sn= '" & strsn(m) & "'","auditdate desc")
    
For Each ap As String In auditopinions
    Output.Show(ap)
 MessageBox.Show(ap)
Next


Next


If auditopinions.Contains("") = False Then
    MessageBox.Show("已经审核的数据不允许重新审核,请重新选择.", "提示",  MessageBoxButtons.OK ,MessageBoxIcon.Information)
    Return
End If

 

为什么这个代码不管auditopinions是不是包含空,都是弹出提示框?注:MessageBox.Show(ap)明明是空白。

 


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/7 11:07:00 [只看该作者]

Dim auditopinions As List(Of String)
For m As Integer = 0 To strsn.Length - 1
    auditopinions = DataTables("audit").GetValues("auditopinion"," sn= '" & strsn(m) & "'","auditdate desc")
   
    If auditopinions.Contains("") = False Then
        MessageBox.Show("已经审核的数据不允许重新审核,请重新选择.", "提示",  MessageBoxButtons.OK ,MessageBoxIcon.Information)
        Return
    End If
   
Next

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


加好友 发短信
等级:幼狐 帖子:105 积分:825 威望:0 精华:0 注册:2015/5/19 9:11:00
  发帖心情 Post By:2016/4/7 11:38:00 [只看该作者]

还是不行呢。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/7 11:42:00 [只看该作者]

 测试没问题,可以判断是否包含空值。

 

 是不是你逻辑有问题啊,上传例子说明你要做什么。


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


加好友 发短信
等级:幼狐 帖子:105 积分:825 威望:0 精华:0 注册:2015/5/19 9:11:00
  发帖心情 Post By:2016/4/8 14:25:00 [只看该作者]

大红袍专家请看例子。。。。。例子来了

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


加好友 发短信
等级:幼狐 帖子:105 积分:825 威望:0 精华:0 注册:2015/5/19 9:11:00
  发帖心情 Post By:2016/4/8 14:26:00 [只看该作者]

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


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/8 15:50:00 [只看该作者]

直接改成

 

Dim auditopinions As List(Of String)

auditopinions = DataTables("audit").GetValues("auditopinion","sn in ('" & bh.replace(",", "','") & "')","auditdate desc")
If auditopinions.Contains("") = False Then
    MessageBox.Show("已经审核的数据不允许重新审核,请重新选择.", "提示",  MessageBoxButtons.OK ,MessageBoxIcon.Information)
    Return
End If


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


加好友 发短信
等级:幼狐 帖子:105 积分:825 威望:0 精华:0 注册:2015/5/19 9:11:00
  发帖心情 Post By:2016/4/8 16:43:00 [只看该作者]

为什么我处理的那个不行?

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


加好友 发短信
等级:幼狐 帖子:105 积分:825 威望:0 精华:0 注册:2015/5/19 9:11:00
  发帖心情 Post By:2016/4/8 16:54:00 [只看该作者]

若是混合选择就出问题了。如选择了未审的两条和已审的一条,就不提示。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/8 16:56:00 [只看该作者]

 你那个是一行一行循环,只要有一行不满足,就弹出和返回了。而你需要的是比较全部,只要有一行是空的,就满足。

 回到顶部
总数 24 上一页 1 2 3 下一页