举例:
1、初始化数据库连接
=
记录集1
数据库连接1.连接Access
(取运行目录
()
+
“\data\data.mdb”,
“”)
记录集1.置连接
(数据库连接)
记录集1.打开
(“信息”,
#数据表名)
超级列表框1.全部删除
()
.计次循环首
(记录集1.记录数量,
索引)
记录集1.读文本
(“编号”,
编号)
记录集1.读文本
(“账号”,
账号)
记录集1.读文本
(“类型”,
类型)
记录集1.读文本
(“等级”,
等级)
记录集1.读文本
(“昵称”,
昵称)
2、外部数据库1.执行
(“delete
from
信息
where
Id=
+超级列表框1.取标题
(超级列表框1.现行选中项,
0)”,
)
这样就删除了id是选中的那条记录的值。
调用格式:〈无返回值〉
对象.删除表项
(整数型
表项索引)
-
扩展界面支持库一->超级列表框
英文名称:Remove
删除指定位置的表项。本命令为初级对象成员命令。
参数<1>的名称为“表项索引”,类型为“整数型(int)”。用于指定列表框中的某一项目,索引值从
0
开始。
*** 作系统需求:
Windows
调用格式:
〈无返回值〉
对象.删除列
(整数型
列索引)
-
扩展界面支持库一->超级列表框
英文名称:RemoveCol
删除报表型列表框中指定位置处的列。本命令为初级对象成员命令。
参数<1>的名称为“列索引”,类型为“整数型(int)”。用作指定报表型列表框中项目所处的列,索引值从
0
开始。
*** 作系统需求:
Windows
需要倒着删除,因为按照表项由小到大的顺序删除,会改变下一个循环被选择表项的索引值。方法一:
.版本 2
.支持库 iext
.子程序 _按钮删除_被单击
.局部变量 i, 整数型
.局部变量 m, 整数型
m = 超级列表框1.取表项数 ()
.计次循环首 (m, i)
.如果真 (超级列表框1.取当前状态图片 (m - i) = 1)
超级列表框1.删除表项 (m - i)
.如果真结束
.计次循环尾 ()
方法二:
.版本 2
.支持库 iext
.子程序 _按钮删除_被单击
.局部变量 i, 整数型
.局部变量 预删表项, 整数型, , "0"
.计次循环首 (超级列表框1.取表项数 (), i)
.如果真 (超级列表框1.取当前状态图片 (i - 1) = 1)
加入成员 (预删表项, i - 1)
数组排序 (预删表项, 假)
.如果真结束
.计次循环尾 ()
.计次循环首 (取数组成员数 (预删表项), i)
超级列表框1.删除表项 (预删表项 [i])
.计次循环尾 ()
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)