Foxtable(狐表)用户栏目专家坐堂 → 窗体副本表怎么根据条件来判断其他副本表数据显示内容


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

主题:窗体副本表怎么根据条件来判断其他副本表数据显示内容

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


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
窗体副本表怎么根据条件来判断其他副本表数据显示内容  发帖心情 Post By:2021/11/10 11:51:00 [只看该作者]


窗体副本表,在启动的时候table1.2.3.4-10都无数据

然后根据table9中的数据获取uuid  姓名  在查找是否有符合条件的uuid值的table7表,如果有,提取table7当前数据行的消费编号  然后对应显示table1.2。3.4.5.6.8表中消费编号等于table7当前数据行的消费标号的  数据   反之如果table7数据没有符合uuid的  table1.2。3.4.5.6.8表全部为空


Dim c1 As Integer = Tables("销售主窗体_table9").Count
If c1>0 Then
    If Tables("销售主窗体_table9").Current("uuid")<>"" Then
        Vars("uuid")=Tables("销售主窗体_table9").Current("uuid")
        
        
        If Tables("销售主窗体_table9").Current("姓名")<>"" Then
            Vars("姓名")=Tables("销售主窗体_table9").Current("姓名")
        End If
        Tables("销售主窗体_table10").Filter="uuid='"&vars("uuid")&"'"
        Tables("销售主窗体_table7").Filter="uuid='"&vars("uuid")&"'"
        Dim c11 As Integer = Tables("销售主窗体_table7").Count
        If c11>0 Then
            If Tables("销售主窗体_table7").Current("消费编号")<> ""  Then
                Tables("销售主窗体_table1").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
                Tables("销售主窗体_table2").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
                Tables("销售主窗体_table3").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
                Tables("销售主窗体_table4").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
                Tables("销售主窗体_table5").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
                Tables("销售主窗体_table6").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
                Tables("销售主窗体_table8").Filter="消费编号='"&Tables("销售主窗体_table7").Current("消费编号")&"'"
            Else
                Tables("销售主窗体_table1").Filter="消费编号='20202021-000'"
                Tables("销售主窗体_table2").Filter="消费编号='20202021-000'"
                Tables("销售主窗体_table3").Filter="消费编号='20202021-000'"
                Tables("销售主窗体_table4").Filter="消费编号='20202021-000'"
                Tables("销售主窗体_table5").Filter="消费编号='20202021-000'"
                Tables("销售主窗体_table6").Filter="消费编号='20202021-000'"
                Tables("销售主窗体_table8").Filter="消费编号='20202021-000'"
            End If
        End If
    End If
End If

窗体打开时
图片点击可在新窗口打开查看
窗体有数据时
图片点击可在新窗口打开查看
窗体无数据时
图片点击可在新窗口打开查看
想实现红色箭头部分无数据时,对应的上述table1.2.3.4.5.6不要出现空行   麻烦老师帮忙修正下代码   谢谢!

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/10 11:55:00 [只看该作者]

If Tables("销售主窗体_table7").Current("消费编号")<> ""  Then
改为
If Tables("销售主窗体_table7").Current.isnull("消费编号") = false  Then

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


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)If Tables("销售主窗体_table7").Cur...  发帖心情 Post By:2021/11/10 12:03:00 [只看该作者]

问题依旧  还得麻烦老师继续指导下  谢谢!
其中消费编号='20202021-000'  这个是值是不存在的值,目的就是找不存在的  然后就不显示了  不晓得是不是与这个地方有关系!
[此贴子已经被作者于2021/11/10 12:05:52编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/10 13:30:00 [只看该作者]

Tables("销售主窗体_table1").Filter="消费编号='20202021-000'"
改为
Tables("销售主窗体_table1").Filter="false"

 回到顶部