以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  SystemIdle报错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=82062)

--  作者:seal51
--  发布时间:2016/3/10 21:02:00
--  SystemIdle报错

打开项目的时候提示表W1587不存在名为"账目名称"的列?

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2016.3.9.1
错误所在事件:SystemIdle
详细错误信息:
索引超出范围。必须为非负值并小于集合大小。
参数名: index

 

明明有名为"账目名称"的列,为何提示没有呢?

 

SystemIdle事件的代码如下:

Dim Sum As Double
With CurrentTable
    Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
End With
StatusBar.Message3 = sum


--  作者:狐狸爸爸
--  发布时间:2016/3/10 22:15:00
--  

1、升级到3.11

2、

Dim Sum As Double
If CurrentTable IsNot Nothing AndAlso CurrentTable.RowSel >= 0 Then
    With CurrentTable
        Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
    End With
    StatusBar.Message3 = sum
End If


--  作者:seal51
--  发布时间:2016/3/11 0:28:00
--  

谢谢狐狸爸爸!

我隐藏了SystemIdle事件的代码

打开项目的时候提示表W1587不存在名为"账目名称"的列?

明明有名为"账目名称"的列,为何提示没有呢?

 

运行错误:未将对象引用设置到对象的实例

 

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2016.3.9.1
错误所在事件:项目,AfterOpenProject
详细错误信息:
未将对象引用设置到对象的实例。

 

一直用的好好的, 为什么会突然出现这种情况呢

 



--  作者:大红袍
--  发布时间:2016/3/11 0:34:00
--  
去看看 AfterOpenProject 事件的代码,加入msgbox,看看哪句代码有问题。
--  作者:seal51
--  发布时间:2016/3/11 0:43:00
--  

这么晚,谢谢回复! 只有以下代码

With DataTables("W1587")
    .LoadOver = "日期" \'清除加载条件
    .LoadFilter = "" \'设置分页加载依据列
End With
Forms("1587加载").Open() \'打开设计好的分页加载窗口


--  作者:大红袍
--  发布时间:2016/3/11 0:47:00
--  
看看 1587加载 窗口的afterLoad事件
--  作者:seal51
--  发布时间:2016/3/11 0:49:00
--  
e.Form.Controls("Label8").Text = Date.Today.Year & "-" & Date.Today.Month
--  作者:Hyphen
--  发布时间:2016/3/11 8:35:00
--  
删除项目下的bin目录,重新打开项目试试
--  作者:大红袍
--  发布时间:2016/3/11 10:24:00
--  
以下是引用seal51在2016/3/11 0:49:00的发言:
e.Form.Controls("Label8").Text = Date.Today.Year & "-" & Date.Today.Month

 

那就不应该报错才对的啊。你加入msgbox,最后定位到哪句代码出问题?