Foxtable(狐表)用户栏目专家坐堂 → [求助]如何判断备注型字段为空值


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

主题:[求助]如何判断备注型字段为空值

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


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

代码文字发上来,不用截图

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


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

Dim max As String
Dim dr As DataRow=DataTables("报名缴费").SQLFind("缴费编号 = '201712-0003087075'")
if dr isnot nothing then
if dr.isnull("课时记录") then
msgbox("没有值")
else
Dim Values() As String
Dim ksjl As String = dr("课时记录")

    ksjl = ksjl.Replace(vbcrlf & vbcrlf,vbcrlf)
    Values = ksjl.split(vbcrlf)
    output.show(values.count)
    For Each i As String In values
        output.show(i)
    Next
end if
end if
[此贴子已经被作者于2021/4/1 10:10:52编辑过]

 回到顶部