- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [讨论]ListBox形式的列表框，如何删除选定的行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=132506)
-- 发布时间：2019/3/23 14:15:00
-- [讨论]ListBox形式的列表框，如何删除选定的行
在窗口里做了一个ListBox形式的列表框，并将列表框与“表A”的列1绑定。
添加内容好做，直接向“表A”的列1内添加即可，但是删除按钮，将列表框内选定的行的内容删除，的代码该如何写？
-- 发布时间：2019/3/23 14:39:00
--
Dim lst As WinForm.ListBox
lst = e.Form.Controls("ListBox1")
lst.Items.Remove(lst.SelectedValue)
-- 发布时间：2019/3/23 17:12:00
--
以上代码不能删除选定内容
-- 发布时间：2019/3/23 17:28:00
--
我测试没有问题，上传实例说明
-- 发布时间：2019/3/23 18:21:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试.zip |
-- 发布时间：2019/3/24 13:11:00
--
参考代码，如
Dim lst As WinForm.ListBox
lst = e.Form.Controls("ListBox1")
lst.SelectedItem.delete
-- 发布时间：2019/3/24 22:10:00
--
以上代码还是不能解决问题！
用以上代码测试后发现，只能删除第一行，并不能删除选定行，并且第一行删除后，选定其他行，选择的值会修改第一行的值。-- 发布时间：2019/3/24 22:37:00
--
以下是引用jjjeyes在2019/3/24 22:10:00的发言：
以上代码还是不能解决问题！
用以上代码测试后发现，只能删除第一行，并不能删除选定行，并且第一行删除后，选定其他行，选择的值会修改第一行的值。
你这个控件，不要【绑定表列】啊。我测试没问题。
[此贴子已经被作者于2019/3/24 22:37:22编辑过]
-- 发布时间：2019/3/24 22:53:00
--
原来如此，谢谢！
但是还是追问一下，为什么以下代码不能执行？
Dim lst As WinForm.ListBox lst = e.Form.Controls("ListBox1") lst.Items.Remove(lst.SelectedValue) |
-- 发布时间：2019/3/24 23:06:00
--
回复9楼，因为你是直接使用【显示列】【取值列】设置的。
如果你通过【自定义项目】、combolist设置的，9楼的代码有效。否则，无效。