未声明变量？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 未声明变量？

共有1727人关注过本帖树形打印复制链接主题：未声明变量？

zsslly

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：四尾狐帖子：972 积分：7193 威望：0 精华：0 注册：2013/5/24 12:29:00

未声明变量？ 发帖心情

Post By：2015/6/23 10:53:00 [只看该作者]

这种代码那里错了，我头大了？

Dim afcbcdb As WinForm.ComboBox = e.Form.Controls("combobox6")

e.Form.Controls("Table2").Table.Filter = "签单月份 like '%" & right(e.Form.Controls("ComboBox3").Text,3) & "%'" And 设计师 Like '%" & afcbcdb.text & "%'"

e.Form.Controls("ComboBox7").Text = e.Form.Controls("Table2").Table.Compute("sum(签单金额)")

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/6/23 10:55:00 [只看该作者]

具体的错误提示发一下.

lmlptj

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：455 积分：3756 威望：0 精华：0 注册：2012/2/8 14:19:00

Post By：2015/6/23 11:26:00 [只看该作者]

Dim afcbcdb As WinForm.ComboBox = e.Form.Controls("combobox6")

e.Form.Controls("Table2").Table.Filter = "签单月份 like '%" & right(e.Form.Controls("ComboBox3").Text,3) & "%'" And 设计师 Like '%" & afcbcdb.text & "%'"

e.Form.Controls("ComboBox7").Text = e.Form.Controls("Table2").Table.Compute("sum(签单金额)")

"签单月份 like '%" & right(e.Form.Controls("ComboBox3").Text,3) & '%" And 设计师 Like '%" & afcbcdb.text & '%""

最后一行红色标记的地方应该是单引号‘号！你给出的是双引号！！

Bin

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/6/23 11:29:00 [只看该作者]

e.Form.Controls("Table2").Table.Filter = "签单月份 like '%" & right(e.Form.Controls("ComboBox3").Text,3) & "%' And 设计师 Like '%" & afcbcdb.text & "%'"

主题：未声明变量？