（急救）如何在列表框中选中行可以删除选中的整行

sunxiang5204 · 发表于 2011-2-10 15:55:00

本帖最后由 sunxiang5204 于 2011-2-10 15:57 编辑

建立一个按钮鼠标点击到那行时可以点击删除按钮删除掉列表框中的整行
前面发了个贴，能删除列表框中的但是是删除掉最上面那一行的不是删除鼠标选中之后的那行

跪求源码

例如按钮为V1 列表框为c1
如何- -!!!

等待高手急救

zyp · 发表于 2011-2-10 16:25:00

列表框应该为设为单选的, 并将列表框绑定为要删除表的主键
在V1的单击事件中写入下面代码:
currentproject.Connection.Execute ("DELETE * FROM 表名 WHERE 主键字段名="& me.c1)
me.c1.requery

roych · 发表于 2011-2-10 17:33:33

把我之前的帖子改改就好了：
http://www.office-cn.net/thread-96036-1-1.html

sunxiang5204 · 发表于 2011-2-11 10:09:22

本帖最后由 sunxiang5204 于 2011-2-11 10:17 编辑

回复 roych 的帖子

帮我弄下吧我把代码弄进去老是提示我错误，是不是非得只能单选哦

在返修清单里面

sunxiang5204 · 发表于 2011-2-11 10:10:17

回复 zyp 的帖子

非常谢谢

但是还是不行不能达到公司的要求不能单选
JJ东西我烦操死了

zyp · 发表于 2011-2-11 14:06:34

请将代码改一下:
SQL = "DELETE * FROM 反修清单 WHERE 编号=" & Me.List11.Column(0, I)

另外,你的表名为"反修清单", 而在删除时,却写成"返修清单", 两个返字不同

如果每次只删除一行, 将List设为单选, 代码可写成:
SQL = "DELETE * FROM 反修清单 WHERE 编号=" & Me.List11

删除后加入 me.list11.requery 以便列表框及时显示删除后的结果

roych · 发表于 2011-2-11 14:49:31

除了LS所提到的这个问题，还有就是你设置的编号为自动编号，而我的代码是针对文本的。改好之后的见附件：

sunxiang5204 · 发表于 2011-2-11 16:46:40

失误失误实在是没看清楚，谢谢啦真的是不知道怎么谢

接着努力边逛边学

thor5566 · 发表于 2011-12-21 09:42:05

努力学习中

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] （急救）如何在列表框中选中行可以删除选中的整行

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)