以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口右下方的统计  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14603)

--  作者:姗姗来迟
--  发布时间:2011/11/25 13:15:00
--  窗口右下方的统计
我自已新建一个窗口  想实现系统自带窗体的样子 当选中某一列或多个单元格的时候会在右下角出现如:汇总、平均值之类的,如果在项目里面设置相应的代码可以实现狐表本身的汇总,我想在自已新建立的窗口下实现这样的功能如何实现,如果版主有时间能不能做一个简单的例子谢谢了  亲亲
--  作者:blackzhu
--  发布时间:2011/11/25 13:22:00
--  *.xlsx 怎么导入到foxtble中
打开窗口.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:系统右下角计算问题.table


--  作者:姗姗来迟
--  发布时间:2011/11/25 14:28:00
--  

如果要是一个表里面好几个窗口 如何修改代码


--  作者:姗姗来迟
--  发布时间:2011/11/25 14:29:00
--  
这个代码只能针对一个窗口  要是一个表里面有好几个窗口 如何把窗口的名子加进去
--  作者:blackzhu
--  发布时间:2011/11/25 15:24:00
--  
在保证控件名字一样的情况下:

For Each frm As WinForm.Form In Forms
            Select frm.Name
                Case "窗口","窗口2","窗口3"
                    If forms(frm.Name).Opened Then
                        统计代码
                    End If
            End Select
        Next

--  作者:姗姗来迟
--  发布时间:2011/11/25 16:00:00
--  

亲亲统计代码 但是我预见一个问题

 

Forms("窗口1").Controls("Label1").text ="    累计:" & Cstr(sum) & "    平均:" & Cstr(Average) & "    计数:"  & Cstr(Count) & " "

 

如何改  亲亲有时间写个全代码可以吗

 

 

 


--  作者:blackzhu
--  发布时间:2011/11/25 16:36:00
--  
Forms(frm.name).Controls("Label1").text ="    累计:" & Cstr(sum) & "    平均:" & Cstr(Average) & "    计数:"  & Cstr(Count) & " "


到这儿来吧:168164262  我们缺少女孩学习.

--  作者:blackzhu
--  发布时间:2011/11/25 17:25:00
--  
你看看,在表事件里面有代码的?
--  作者:姗姗来迟
--  发布时间:2011/11/26 13:45:00
--  

这个代码只能针对一个窗口与一个窗口里面的表用   如果一个窗口里面有多个表这个代码就不管用了 如何能实现一个窗口中有多个表  如何实现


--  作者:blackzhu
--  发布时间:2011/11/26 13:57:00
--  
请在每一个表的属性中设置同一个代码,明白不?