以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]状态栏当前表选择区域合计问题怎么解决  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=45485)

--  作者:浙江仔
--  发布时间:2014/1/27 10:57:00
--  [求助]状态栏当前表选择区域合计问题怎么解决

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:状态栏当前区域合计.table

 

原帖:

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=40853&authorid=0&page=0&star=1

 

发现一个问题,就是对数据进行排序后,会出现如下错误,不知道怎么解决或屏蔽错误?

 

---------------------------

版本:2013.10.14.1

---------------------------

错误代码位置:YH_jiancha,AfterSelRangeChange

 

 

System.IndexOutOfRangeException: 索引 -2 不是为负数,就是大于行数。

   在 System.Data.DataView.GetRow(Int32 index)

   在 System.Data.DataView.System.Collections.IList.get_Item(Int32 recordIndex)

   在 Foxtable.OlO1110llO.OOO0OOll(Int32 OO0Ol)

   在 Foxtable.RowCollection.get_Item(Int32 Ol11l)

   在 UserCode.AfterSelRangeChange(CellRangeChangeEventArgs e)

---------------------------

确定  

---------------------------


--  作者:Bin
--  发布时间:2014/1/27 11:11:00
--  
看一下这个吧 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=40831&skin=0
--  作者:浙江仔
--  发布时间:2014/1/27 11:21:00
--  
以下是引用Bin在2014-1-27 11:11:00的发言:
看一下这个吧 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=40831&skin=0

看过,我想实现类似excel表格的效果,还是1楼那个范例合适,就是错误提示比较麻烦,看不懂

 

 


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

--  作者:lsy
--  发布时间:2014/1/27 11:25:00
--  
\'\'\'
StatusBar.Message1 = ""
Dim s As String
Dim sum As Double
If CurrentTable IsNot Nothing Then
    If e.Table.RowSel < 0 OrElse e.Table.ColSel < 0 Then
        Return
    End If
    For Each c As Col In CurrentTable.Cols
        sum = 0
        If c.IsNumeric Then
            For i As Integer = e.NewRange.TopRow To e.NewRange.BottomRow
                sum + = CurrentTable.Rows(i)(c.Name)
            Next
            s + = c.Name & "  " & sum & "  "
        End If
    Next
    StatusBar.Message1 =  "当前区域合计:" & "  总行数  " & e.NewRange.BottomRow - e.NewRange.TopRow + 1 & "  " & s
Else
    StatusBar. Reset()
End If

--  作者:浙江仔
--  发布时间:2014/1/27 11:31:00
--  
lsy 完美解决啊,太厉害了
谢谢,非常感谢

祝大家新年快乐!