以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这段代码为何没有输出结果?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154377)

--  作者:hitzfeld
--  发布时间:2020/9/13 0:10:00
--  这段代码为何没有输出结果?
For Each dr1 As DataRow In DataTables("表A").DataRows
  Dim s As String = dr1("第一列")
    If s.Length =0 Then
       msgbox(s)
    End If
Next

在表A的第一列存在长度不等的字符串,我的目的是要跳过字符串长度为1的记录,但是做实验发现上面这段代码执行后没有任何反应?百思不得其解?
其中s.Length =0 或者=1或者<1都试过了,都是没有任何输出。
但是改成s.Length >就会输出正确的结果,虽然这个结果不是我要的。

--  作者:程兴刚
--  发布时间:2020/9/13 7:37:00
--  
因为s.Length都大于1,所以没结果!
--  作者:hitzfeld
--  发布时间:2020/9/13 11:42:00
--  
不对,我的记录是存在小于1的记录的,比如下面的表

第一列
-----------------------
AAAAA
B
CCC
---------------------
其中第二条记录的值应该就是0,但是我用条件=0或者用<1都不能输出结果,但是我用>0的时候,输出的是第1和第3条结果,说明2被跳过了。
所以我才觉得奇怪啊?

--  作者:有点蓝
--  发布时间:2020/9/13 20:34:00
--  
第二条记录的值Length 是1,不是0!0表示没有任何数据

如果被跳过,肯定是其它原因