Foxtable(狐表)用户栏目专家坐堂 → 请教专家关于查询的问题


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

主题:请教专家关于查询的问题

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


加好友 发短信
等级:婴狐 帖子:13 积分:157 威望:0 精华:0 注册:2011/5/31 18:09:00
请教专家关于查询的问题  发帖心情 Post By:2011/5/31 22:20:00 [只看该作者]

哪位专家能告诉小弟我怎么做这个查询啊?

例如:

表1

       第一列 第二列

1        a        5

2        a        7

3        b        6

4        a        8

5        b        7

6        a        4

7        a        9

8        b        8

9        a        8

---------------------------(问题:在表2的第一列1行里面输入a或者b,第二列的第一行会自动显示表一相应a或者b的最大值)

表2

       第一列 第二列

1

2

我表达的应该可以看得懂吧!?谢谢专家指教啊!昨天刚开始学习这个软件,但是老板要我一周内做出一个比较完善的数据库。晕死~再次感谢!


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2011/6/1 1:04:00 [只看该作者]

以下是引用nightsky1206在2011-5-31 22:20:00的发言:

哪位专家能告诉小弟我怎么做这个查询啊?

例如:

表1

       第一列 第二列

1        a        5

2        a        7

3        b        6

4        a        8

5        b        7

6        a        4

7        a        9

8        b        8

9        a        8

---------------------------(问题:在表2的第一列1行里面输入a或者b,第二列的第一行会自动显示表一相应a或者b的最大值)

表2

       第一列 第二列

1

2

我表达的应该可以看得懂吧!?谢谢专家指教啊!昨天刚开始学习这个软件,但是老板要我一周内做出一个比较完善的数据库。晕死~再次感谢!

一周内做出一个比较完善的数据库:你做不到的(估计专家们都没有几个能完成),可以选择投降啦···· 呵呵。


Tables("表2").Current("第二列") = Tables("表1").Compute("Max(第二列)", "第一列 = '" & Tables("表2").Current("第一列")  & "' ")

[此贴子已经被作者于2011-6-1 1:08:51编辑过]

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


加好友 发短信
等级:婴狐 帖子:13 积分:157 威望:0 精华:0 注册:2011/5/31 18:09:00
  发帖心情 Post By:2011/6/1 6:46:00 [只看该作者]

太感谢了,这一周还会有很多不懂的地方需要问大家!请多多指教啊!


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


加好友 发短信
等级:婴狐 帖子:13 积分:157 威望:0 精华:0 注册:2011/5/31 18:09:00
  发帖心情 Post By:2011/6/1 7:11:00 [只看该作者]

图片点击可在新窗口打开查看

 

你好,还是这个问题,我每次只是按一次“执行”它才执行一次命令,可不可以我输入之后A或者B之后,系统直接就可以帮我算出来最大值呢?谢谢!!


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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57634 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2011/6/1 7:22:00 [只看该作者]

放在表2表属性DataColChanged中


If e.DataCol.Name = "第二列" Then '如果第二列输入内容
    Tables("表2").Current("第二列") = Tables("表1").Compute("Max(第二列)", "第一列 = '" & Tables("表2").Current("第一列")  & "' ")   '执行计算代码


    End If
End
If

 回到顶部