超列读取删除、增加MDB数据后，显示的问题

xf702

只要通过超列删除了MDB中间的数据，再增加数据后，超列读取时，该数据不在最后一行显示，而是插到中间的某一行显示。。打开数据库查看，新增的数据确实在最后一行。。。百思不得其解。。。

走一回

超级列表框的删除，要看索引号在哪里，你删除到哪里，索引号就在哪里；
库里的记录一定是添加到最后的。

weiqinghan

不贴代码 怎么猜呢

lisher

数据有行的增删改动就 清空一次超列,然后重新载入一次

1752328925

因为你cha询的时候是排序cha询的，所以超级列表是排序后的结果，但是数据库里没有排序

xf702

走一回 发表于 2024-2-6 16:30
超级列表框的删除，要看索引号在哪里，你删除到哪里，索引号就在哪里；
库里的记录一定是添加到最后的。 ...

从MDB里取数据时，索引号重置了的。大佬的意思是，如果1-100行数据，如果删除了超列中间的，再读入时会补空刚删掉的位置吗？

走一回

xf702 发表于 2024-2-6 16:39
从MDB里取数据时，索引号重置了的。大佬的意思是，如果1-100行数据，如果删除了超列中间的，再读入时会补 ...

    调用格式： 〈整数型〉 对象．插入表项 （［整数型 插入位置］，［文本型 标题］，［整数型 图片索引］，［整数型 状态图片索引］，［整数型 缩进数目］，［整数型 表项数值］） - 扩展界面支持库一->超级列表框
    英文名称：Insert
    在指定的位置插入新表项，成功返回新表项的位置索引，失败返回 -1 。本命令为初级对象成员命令。
    参数<1>的名称为“插入位置”，类型为“整数型（int）”，可以被省略。指定新表项插入时的位置索引，索引值从 0 开始。如果提供 -1 ，则插入到列表框的尾部。如果本参数被省略，默认值为 -1。注意，“类型”属性为“大图标列表框”或“小图标列表框”的情况下，将始终在所有表项的最后插入新的表项。

这个索引，也就是插入位置是你可以指定的，不指定就是插入到最后，写0就是插入在最上面，写1就是插入到第二行，以此类推。

xf702

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

增加 ()

子程序名	返回值类型	公开	备 注
增加

变量名	类 型	静态	数组	备 注
sql	文本型

sql ＝ “insert into CQZ (车号,单位,姓名,联系电话,车型) values ('” ＋ 编辑框1.内容 ＋ “','” ＋ 编辑框2.内容 ＋ “','” ＋ 编辑框3.内容 ＋ “','” ＋ 编辑框4.内容 ＋ “','” ＋ 编辑框5.内容 ＋ “')”
如果真 (数据库连接1.执行SQL (sql, ) ＝ 真)
读出数据 ()
超级列表框1.保证显示 (超级列表框1.取表项数 () － 1)
信息框 (“数据录入成功！”, 0, , )

子程序名	返回值类型	公开	备 注
删除

变量名	类 型	静态	数组	备 注
sql	文本型
删除行	文本型

删除行 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 3)
sql ＝ “delete from CQZ where 姓名 ='” ＋ 删除行 ＋ “'”
如果真 (数据库连接1.执行SQL (sql, ) ＝ 真)
信息框 (“数据库删除成功！”, 0, , )
超级列表框1.删除表项 (超级列表框1.现行选中项)
读出数据 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

又有新的问题了，这种写法的删除，会把同名的一并删除？该怎么弄呢？
删除 ()

i支持库列表	支持库注释
eDB	数据库操作支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 eDB<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 增加 ()<br /> <br /> .子程序 增加<br /> .局部变量 sql, 文本型<br /> <br /> sql ＝ “insert into CQZ (车号,单位,姓名,联系电话,车型) values ('” ＋ 编辑框1.内容 ＋ “','” ＋ 编辑框2.内容 ＋ “','” ＋ 编辑框3.内容 ＋ “','” ＋ 编辑框4.内容 ＋ “','” ＋ 编辑框5.内容 ＋ “')”<br /> .如果真 (数据库连接1.执行SQL (sql, ) ＝ 真)<br />     读出数据 ()<br />     超级列表框1.保证显示 (超级列表框1.取表项数 () － 1)<br />     信息框 (“数据录入成功！”, 0, , )<br /> .如果真结束<br /> <br /> .版本 2<br /> .支持库 iext<br /> .支持库 eDB<br /> <br /> .子程序 删除<br /> .局部变量 sql, 文本型<br /> .局部变量 删除行, 文本型<br /> <br /> 删除行 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 3)<br /> sql ＝ “delete from CQZ where 姓名 ='” ＋ 删除行 ＋ “'”<br /> .如果真 (数据库连接1.执行SQL (sql, ) ＝ 真)<br />     信息框 (“数据库删除成功！”, 0, , )<br />     超级列表框1.删除表项 (超级列表框1.现行选中项)<br />     读出数据 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> 又有新的问题了，这种写法的删除，会把同名的一并删除？该怎么弄呢？<br /> <br /> 删除 ()

代码贴上了。。

xf702

weiqinghan 发表于 2024-2-6 14:03
不贴代码 怎么猜呢

代码贴出来了，请指点。。

xf702

走一回 发表于 2024-2-6 16:43
调用格式： 〈整数型〉 对象．插入表项 （［整数型 插入位置］，［文本型 标题］，［整数型 图片索引 ...

增加好像可以了，但是删除又有点问题，帮忙看看哪地方不对。。