Foxtable(狐表)用户栏目专家坐堂 → compute条件中如何加入变量


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

主题:compute条件中如何加入变量

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


加好友 发短信
等级:一尾狐 帖子:437 积分:3682 威望:0 精华:0 注册:2014/4/28 18:50:00
compute条件中如何加入变量  发帖心情 Post By:2016/6/1 11:09:00 [只看该作者]

 Dim nv As WinForm.NavBar = Forms("订单明细").Controls("NavBar1")
 Dim ztl As WinForm.Label = Forms("订单明细").Controls("状态栏")
 Select Case nv.SelectedPage.Name
        Case "砂光"
Dim Byc As Double = DataTables("订单明细").Compute("Sum(产值)","砂光日期 = #" & Date.today.AddDays(-1) & " # And 砂光检验 = 1 And 砂光 <> 'TG'") 

end select
将红色文字用nv.SelectedPage.Name代替,应该怎么写


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


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

dim str As String = nv.SelectedPage.Name

Dim Byc As Double = DataTables("订单明细").Compute("Sum(产值)", str & "日期 = #" & Date.today.AddDays(-1) & " # And " & str & "检验 = 1 And " & str & " <> 'TG'") 


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


加好友 发短信
等级:一尾狐 帖子:437 积分:3682 威望:0 精华:0 注册:2014/4/28 18:50:00
  发帖心情 Post By:2016/6/1 11:33:00 [只看该作者]

谢谢

 回到顶部