Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共13 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:[求助] 关于状态栏右侧的问题求教!

1楼
gamtings 发表于:2009/9/2 23:55:00

Dim Sum,Average,Count As Double
With e.Table
    Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
    Average = .Aggregate(AggregateEnum.Average, .TopRow, .LeftCol, .BottomRow, .RightCol)
    Count = .Aggregate(AggregateEnum.Count, .TopRow, .LeftCol, .BottomRow, .RightCol)
End With
StatusBar.Message3 = "    累计:" & Cstr(sum) & "    平均:" & Cstr(Average) & "    计数:"  & Cstr(Count) & "     "

以前在项目的AfterSelRangeChange事件中加了以上代码,以在状态栏右侧显示选定区域的合计数等,现在用新版的狐表怎么不起作用了???


 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:管理项目1.table

2楼
yangming 发表于:2009/9/3 0:10:00
Dim Sum,Average,Count As Double
With e.Table
    Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
    Average = .Aggregate(AggregateEnum.Average, .TopRow, .LeftCol, .BottomRow, .RightCol)
    Count = .Aggregate(AggregateEnum.Count, .TopRow, .LeftCol, .BottomRow, .RightCol)
End With
StatusBar.Message3 = "      累计:" & Cstr(sum) & "平均:" & Cstr(Average) & "  计数:"  & Cstr(Count) & " "
我测试没问题,可以显示啊
3楼
gamtings 发表于:2009/9/3 0:31:00

图片点击可在新窗口打开查看此主题相关图片如下:f.gif
图片点击可在新窗口打开查看

在表中选择不同区域,状态栏右侧只会闪一步,并没有显示文字,而左侧的则有显示

[此贴子已经被作者于2009-9-3 0:36:11编辑过]
4楼
gamtings 发表于:2009/9/3 8:42:00
麻烦大家帮我测测,好像在9月2号的版本中不行,以前的记得是没这个问题的。
5楼
baoxyang 发表于:2009/9/3 8:59:00
我这也没有,以前没有注意。只要找开新的窗口就没有了。我在登陆时设置时有存在,某一窗口打开时就不存在了。
6楼
gamtings 发表于:2009/9/3 9:04:00
以下是引用baoxyang在2009-9-3 8:59:00的发言:
我这也没有,以前没有注意。只要找开新的窗口就没有了。我在登陆时设置时有存在,某一窗口打开时就不存在了。

  
  哈哈,终于找到和我出现一样问题的狐友了。图片点击可在新窗口打开查看

7楼
狐狸爸爸 发表于:2009/9/3 9:15:00
去掉空格:

StatusBar.Message3 = " 累计:" & Cstr(sum) & "平均:" & Cstr(Average) & "  计数:"  & Cstr(Count)
8楼
baoxyang 发表于:2009/9/3 9:32:00

哦,试试


9楼
gamtings 发表于:2009/9/3 9:43:00
还真是,现在可以了!!!
10楼
yangming 发表于:2009/9/3 9:43:00
我二楼的代码是用昨天第二版测的,右侧的空格比你原来的小了一点,测试通过了,当然,最好是别用空格,呵呵
共13 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03418 s, 3 queries.