- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 插入空行后复制上一行内容出错 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=98411)
-- 发布时间：2017/3/29 13:28:00
-- 插入空行后复制上一行内容出错
麻烦问一下，我在某一行下面插入了一行，而后复制上一行内容进行粘贴，出现如下错误，是怎么回事。
.NET Framework 版本：2.0.50727.3649
Foxtable 版本：2017.3.18.1
错误所在事件：菜单,Undo,Click
详细错误信息：
索引超出了数组界限。
-- 发布时间：2017/3/29 14:51:00
--
贴出你写的代码。
-- 发布时间：2017/3/29 14:58:00
--
If CurrentTable.Current Is Nothing Then
CurrentTable.AddNew
Else
Dim ir As Row
If CurrentTable.Current.Index = CurrentTable.rows.Count-1 Then
ir = CurrentTable.AddNew
Else
CurrentTable.Position += 1
ir = CurrentTable.InsertNew
End If
For Each c As Col In CurrentTable.cols
If c.DataCol.Expression = "" Then
ir(c) = CurrentTable.rows(ir.Index-1)(c)
End If
Next
End If
-- 发布时间：2018/5/25 15:39:00
-- 回复：（有点色）If CurrentTable.Current Is Nothing...
用上面代码报错如下，什么问题呢？
创建日期 列是日期data
此主题相关图片如下：gg.jpg
此主题相关图片如下：ee.jpg
[此贴子已经被作者于2018/5/25 15:46:51编辑过]
-- 发布时间：2018/5/25 15:44:00
--
代码肯定没问题，上传出错例子测试。