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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 老师帮忙看看

共有2312人关注过本帖树形打印复制链接主题：老师帮忙看看

hebxtshhyj

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

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

老师帮忙看看 发帖心情

Post By：2017/4/13 10:49:00 [显示全部帖子]

Dim q As new QueryBuilder

q.TableName="应收账款"

q.SelectString = "select '' As 日期,"期初" As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 fro m {客户信息表} "

Tables("查询_tbl客户查询").DataSource = Tables("应收账款")

直接运行aql 语句没有问题，写到q.selectstring 中提示编译错误。应该怎么写呢？

[此贴子已经被作者于2017/4/13 10:49:46编辑过]

hebxtshhyj

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

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 11:00:00 [显示全部帖子]

不是数据源的问题

'Dim q As new QueryBuilder

'q.TableName="应收账款"

'q.Connection Name="宁首"

'q.SelectString = "sel ect '' As 日期,"期初" As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 fro m {客户信息表} "

'Tables("查询_tbl客户查询").DataSource = Tables("应收账款")

[此贴子已经被作者于2017/4/13 11:03:00编辑过]

hebxtshhyj

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

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 11:20:00 [显示全部帖子]

想要的效果出不来啊，查询不到图片点击可在新窗口打开查看

hebxtshhyj

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

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 11:36:00 [显示全部帖子]

我想要在 ”查询“ 窗口中点”查询“按钮，在”查询“窗口的table表 ”tbl客户查询“ 中显示 select语句的内容。

语句写在了按钮的单击事件中。

[此贴子已经被作者于2017/4/13 11:36:38编辑过]

hebxtshhyj

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

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 14:04:00 [显示全部帖子]

我认真的看了2楼了。

我已经把“期初”改为'期初'了，在窗口中不提示错误，实际预览运行，想要的效果还是出不来，sql语句在sql窗口能测试运行成功。

我回复的时候，没有把双引号改过来。

数据源我也是有填写的。

我想问一下老师：定义的这个查询表，必需要运行Build方法吗？不执行这个方法，即使是定义了sql语句，查询表也是生成不了的，也就无法引用，是这样吗？

Tables("查询_tbl客户查询").DataSource = Tables("应收账款") 这句有没有问题？

hebxtshhyj

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

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 14:11:00 [显示全部帖子]

老师我搞定了，

把Tables("查询_tbl客户查询").DataSource = Tables("应收账款") 改为

Tables("查询_tbl客户查询").DataSource = DataTables("应收账款")

就好了。

下一主题 >> << 上一主题

主题：老师帮忙看看