Foxtable(狐表)用户栏目专家坐堂 → [求助]指定业务员得不出任何数据


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

主题:[求助]指定业务员得不出任何数据

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


加好友 发短信
等级:幼狐 帖子:84 积分:679 威望:0 精华:0 注册:2020/12/25 0:49:00
[求助]指定业务员得不出任何数据  发帖心情 Post By:2021/1/26 13:08:00 [显示全部帖子]

其中业务员以下拉框填入的名字为准进行数据统计,但下面语句执行后没有任何数据,请教哪里需要修改?

Dim d1 As Date = e.Form.Controls("统计_StartDate").Value
Dim d2 As Date = e.Form.Controls("统计_EndDate").Value
Dim ywy As WinForm.ComboBox = e.Form.Controls("统计业务员名称") '下拉框名称

If d1 = Nothing Or d2 = Nothing Then
    MessageBox.Show("起始或结束日期都不能为空!","友情提醒",MessageBoxButtons.OK,MessageBoxIcon.Warning)
End If

Dim g As New GroupTableBuilder("业务员单", DataTables("登记表"))  '业务员单为Click按钮名称
g.Filter = "业务日期>=#" & d1 & "# and 业务日期<=#" & d2 & "#"
g.Filter = "业务员 = '" & ywy.text & "'"
g.Totals.AddDef("流入金额")
g.Totals.AddDef("流出金额")
g.VerticalTotal = True
g.SubTotal = True
g.Decimals = 2
g.FromServer = True
g.Build()

Tables("业务管理_统计报表").DataSource = g.BuildDataSource()
e.Form.Controls("统计报表").Visible = True

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


加好友 发短信
等级:幼狐 帖子:84 积分:679 威望:0 精华:0 注册:2020/12/25 0:49:00
  发帖心情 Post By:2021/1/26 16:51:00 [显示全部帖子]

谢谢蓝版

 回到顶部