以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [讨论]表不能操作了? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142078) |
-- 作者:gzlw2019 -- 发布时间:2019/10/17 21:13:00 -- [讨论]表不能操作了? 第15个表只能有10行记录吗?我增加了一个记录,马上关闭系统,再打开系统进入,还是10个记录,这10个记录可以修改保存,是试用版原因吗? 用程序执行出现如下提示: .NET Framework 版本:4.0.30319.1026 Foxtable 版本:2019.8.3.1 错误所在事件:窗口,查询员工,Bt新建,Click 详细错误信息: This row has been removed from a table and does not have any data. BeginEdit() will allow creation of new data in this row. 程序代码: Dim S分组() As String ={"办公室","办公室","办公室","制管A班","制管B班","焊管A班","焊管B班","质检.机修","质检.机修","注塑","车床.布丝.破碎.拉粒","车床.布丝.破碎.拉粒","车床.布丝.破碎.拉粒","饭堂.后勤.保安","饭堂.后勤.保安","饭堂.后勤.保安"} Dim Y部门() As String = {"办公室","生产技术部","财务部","制管A班","制管B班","焊管A班","焊管B班","质检","机修","注塑","破碎.拉粒","布丝","车床","后勤部","保安部","厨房"} Dim 次序() As Single ={1,1,1.1,4,5,6,7,3.1,3,8,9,9,9,2.3,2.1,2} dbj.Rows.AddNew() --------------成功------------ msgbox("测试开始,部门= " & dr("部门")) --------------成功------------ i = Array.Indexof(Y部门,dr("部门")) --------------错误-------------- msgbox("i= " & i) -----------------没执行-------------------- dbj.Current("分组") = S分组(i) dbj.Current("次序") = 次序(i) dbj.Current("姓名") = dr("姓名") |
-- 作者:有点酸 -- 发布时间:2019/10/17 21:19:00 -- 参考: |
-- 作者:gzlw2019 -- 发布时间:2019/10/18 14:03:00 -- 还不行? 加载所有记录,还是同样错误 [此贴子已经被作者于2019/10/18 14:22:40编辑过]
|
-- 作者:有点蓝 -- 发布时间:2019/10/18 14:32:00 -- 提示什么错误? |
-- 作者:gzlw2019 -- 发布时间:2019/10/18 15:16:00 -- |
-- 作者:有点蓝 -- 发布时间:2019/10/18 15:42:00 -- 这个表有没有新增行的事件代码?这个错误看不出和上面的代码有什么关系 [此贴子已经被作者于2019/10/18 15:42:30编辑过]
|
-- 作者:gzlw2019 -- 发布时间:2019/10/18 16:11:00 -- 表是空表,没有代码 |
-- 作者:有点蓝 -- 发布时间:2019/10/18 16:17:00 -- 1、更新到最新版本的Foxtable 2、做个例子发上来测试
|
-- 作者:gzlw2019 -- 发布时间:2019/10/18 16:34:00 -- 更新了,结果一样 |
-- 作者:有点蓝 -- 发布时间:2019/10/18 16:59:00 -- 请上传实例测试 |