纯小白问下可以实现修改删除修改指定序号的内容 并且导....

瓜皮天尊

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

创建数据库子程序 ()

子程序名	返回值类型	公开	备 注
创建数据库子程序

变量名	类 型	静态	数组	备 注
计次
索引	整数型
字段	字段信息		10

如果真 (取反 (文件是否存在 (取运行目录 () ＋ “\你要建立的数据库名.edb”)))
字段 [1].名称 ＝ “名称1”  ' 字段名
字段 [2].名称 ＝ “名称2”
字段 [3].名称 ＝ “名称3”
字段 [4].名称 ＝ “名称4”
字段 [5].名称 ＝ “名称5”
字段 [6].名称 ＝ “名称6”
字段 [7].名称 ＝ “名称7”
字段 [8].名称 ＝ “名称8”
字段 [9].名称 ＝ “名称9”
' 如有需要自己添加
连续赋值 ( #文本型, 字段 [1].类型, 字段 [2].类型, 字段 [3].类型, 字段 [4].类型, 字段 [5].类型, 字段 [6].类型, 字段 [7].类型, 字段 [8].类型, 字段 [9].类型)
创建 (取运行目录 () ＋ “\你要建立的数据库名.edb”, 字段)
打开 (取运行目录 () ＋ “\你要建立的数据库名.edb”, “你要建立的数据库名”, , , , , )
载入数据 ()

子程序名	返回值类型	公开	备 注
载入数据

变量名	类 型	静态	数组	备 注
计次
索引	整数型

置当前库 (“你要建立的数据库名”)
超级列表框1.全部删除 ()
超级列表框1.禁止重画 ()
计次循环首 (取记录数 () ＋ 1, 计次)
跳到 (计次)
如果真 (计次 ＞ 取记录数 ())
跳出循环 ()
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))
超级列表框1.置标题 (索引, 1, 读 (“名称1”))
超级列表框1.置标题 (索引, 2, 读 (“名称2”))
超级列表框1.置标题 (索引, 3, 读 (“名称3”))
超级列表框1.置标题 (索引, 4, 读 (“名称4”))
超级列表框1.置标题 (索引, 5, 读 (“名称5”))
超级列表框1.置标题 (索引, 6, 读 (“名称6”))
超级列表框1.置标题 (索引, 7, 读 (“名称7”))
超级列表框1.置标题 (索引, 8, 读 (“名称8”))
超级列表框1.置标题 (索引, 9, 读 (“名称9”))
计次循环尾 ()
超级列表框1.允许重画 ()

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

写入数据 ()
载入数据 ()
连续赋值 (“”, 编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容, 编辑框6.内容, 编辑框7.内容, 编辑框8.内容, 编辑框9.内容)

子程序名	返回值类型	公开	备 注
写入数据

置当前库 (“你要建立的数据库名”)
如果真 (加记录 (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容, 编辑框6.内容, 编辑框7.内容, 编辑框8.内容, 编辑框9.内容) ＝ 真)
信息框 (“添加数据成功！！”, 0, , )

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

' 连续赋值 (“”, 编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容, 编辑框6.内容)

子程序名	返回值类型	公开	备 注
__启动窗口_可否被关闭	逻辑型

关闭 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 创建数据库子程序 ()<br /> <br /> .子程序 创建数据库子程序<br /> .局部变量 计次<br /> .局部变量 索引, 整数型<br /> .局部变量 字段, 字段信息, , "10"<br /> <br /> .如果真 (取反 (文件是否存在 (取运行目录 () ＋ “\你要建立的数据库名.edb”)))<br />     字段 [1].名称 ＝ “名称1”  ' 字段名<br />     字段 [2].名称 ＝ “名称2”<br />     字段 [3].名称 ＝ “名称3”<br />     字段 [4].名称 ＝ “名称4”<br />     字段 [5].名称 ＝ “名称5”<br />     字段 [6].名称 ＝ “名称6”<br />     字段 [7].名称 ＝ “名称7”<br />     字段 [8].名称 ＝ “名称8”<br />     字段 [9].名称 ＝ “名称9”<br />     ' 如有需要自己添加<br />     连续赋值 (#文本型, 字段 [1].类型, 字段 [2].类型, 字段 [3].类型, 字段 [4].类型, 字段 [5].类型, 字段 [6].类型, 字段 [7].类型, 字段 [8].类型, 字段 [9].类型)<br />     创建 (取运行目录 () ＋ “\你要建立的数据库名.edb”, 字段)<br /> .如果真结束<br /> 打开 (取运行目录 () ＋ “\你要建立的数据库名.edb”, “你要建立的数据库名”, , , , , )<br /> 载入数据 ()<br /> <br /> .子程序 载入数据<br /> .局部变量 计次<br /> .局部变量 索引, 整数型<br /> <br /> 置当前库 (“你要建立的数据库名”)<br /> 超级列表框1.全部删除 ()<br /> 超级列表框1.禁止重画 ()<br /> .计次循环首 (取记录数 () ＋ 1, 计次)<br />     跳到 (计次)<br />     .如果真 (计次 ＞ 取记录数 ())<br />         跳出循环 ()<br />     .如果真结束<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />     超级列表框1.置标题 (索引, 1, 读 (“名称1”))<br />     超级列表框1.置标题 (索引, 2, 读 (“名称2”))<br />     超级列表框1.置标题 (索引, 3, 读 (“名称3”))<br />     超级列表框1.置标题 (索引, 4, 读 (“名称4”))<br />     超级列表框1.置标题 (索引, 5, 读 (“名称5”))<br />     超级列表框1.置标题 (索引, 6, 读 (“名称6”))<br />     超级列表框1.置标题 (索引, 7, 读 (“名称7”))<br />     超级列表框1.置标题 (索引, 8, 读 (“名称8”))<br />     超级列表框1.置标题 (索引, 9, 读 (“名称9”))<br /> .计次循环尾 ()<br /> 超级列表框1.允许重画 ()<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 写入数据 ()<br /> 载入数据 ()<br /> 连续赋值 (“”, 编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容, 编辑框6.内容, 编辑框7.内容, 编辑框8.内容, 编辑框9.内容)<br /> <br /> .子程序 写入数据<br /> <br /> 置当前库 (“你要建立的数据库名”)<br /> .如果真 (加记录 (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容, 编辑框6.内容, 编辑框7.内容, 编辑框8.内容, 编辑框9.内容) ＝ 真)<br />     信息框 (“添加数据成功！！”, 0, , )<br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> ' 连续赋值 (“”, 编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容, 编辑框6.内容)<br /> <br /> .子程序 __启动窗口_可否被关闭, 逻辑型<br /> <br /> 关闭 ()

瓜皮天尊

纯小白求大佬解惑

xf702

没弄明白想问啥？

大漠苍狼易语言

不知道你要搞什么，正常情况下都是想改哪改哪，想删哪删哪

瓜皮天尊

xf702 发表于 2026-6-20 11:13
没弄明白想问啥？

这个列表框 加入写错了怎么写代码实现 在线列表框上就能修改信息  然后怎么加个列表框内容导出EXCEL的功能 （哇 源码作者来了）

瓜皮天尊

xf702 发表于 2026-6-20 11:13
没弄明白想问啥？

我之前可能是等级太低 没法留言

xf702

瓜皮天尊 发表于 2026-6-20 11:20
这个列表框 加入写错了怎么写代码实现 在线列表框上就能修改信息  然后怎么加个列表框内容导出EXCEL的功 ...

导出的话，论坛搜一下 田心南 超列导出模块，个人认为是最好用的，加个按钮加上动作就行了。数据库写不进去，你再看看原示例吧。。

瓜皮天尊

大漠苍狼易语言 发表于 2026-6-20 11:15
不知道你要搞什么，正常情况下都是想改哪改哪，想删哪删哪

目前编译出来的列表框没有删除指定行或者内容的功能该如何写代码实现这个要求

大漠苍狼易语言

瓜皮天尊 发表于 2026-6-20 11:43
目前编译出来的列表框没有删除指定行或者内容的功能该如何写代码实现这个要求 ...

不是一两句话说得清楚的

白宝宝

这不挺简单的吗?
取选中里面项目标题 取到编辑框上 然后做一个修改按钮 修改编辑框内容 再点修改 自动替换掉你选中的那行内容

删除项目 就用删除项目不就好了... 这几个楼 不知道在干嘛 一直在说1 2 句话 说不清楚.. 这不是听清楚的吗