- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何实现勾选某行的“复选框”该行的姓名自动进入姓名控件？谢谢 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=4672)
-- 发布时间：2009/10/19 10:14:00
-- 如何实现勾选某行的“复选框”该行的姓名自动进入姓名控件？谢谢
“人事工资管理”表中的“数据查询窗口”，如何实现勾选某行的“复选框”该行的姓名自动进入姓名控件！！！
此主题相关图片如下：1.jpg
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:rsgzglxt.rar |
-- 发布时间：2009/10/19 10:49:00
--
版主帮帮忙，谢谢
-- 发布时间：2009/10/19 11:09:00
--
好像应该在 AfterCheckRow事件中设置以下代码，虽然可以达到你的要求，不过有点问题，你可以尝试一下。
Forms("数据查询窗口").Controls("输入查询姓名").value=e.Table.Current("姓名")
新手回复，有错莫笑
问题就是复选框的状态未变，我没看你的其它代码，不知道是不是有冲突
[此贴子已经被作者于2009-10-19 11:09:37编辑过]
-- 发布时间：2009/10/19 11:16:00
--
不过我感觉在这里用复选有点不太合适，如果是对字段去复选还算可以，如果用户不小心选择了两行，有可能会带来不可预知的后果（这种假设是在你复选后，通过按钮再去查询的时候）
-- 发布时间：2009/10/19 11:24:00
--
问题就是复选框的状态未变
就是这个问题！！！
-- 发布时间：2009/10/19 11:24:00
--
版主如何改，谢谢
-- 发布时间：2009/10/19 11:35:00
--
放在改变前就行了 BeforeCheckRow
[此贴子已经被作者于2009-10-19 11:35:58编辑过]
-- 发布时间：2009/10/19 11:41:00
--
放在改变前，选择第一行以外的要报错
-- 发布时间：2009/10/19 11:48:00
--
如果一定要变就这样吧
if e.table.Current.Checked = True Then
Forms("数据查询窗口").Controls("输入查询姓名").Value = e.Table.Current("姓名")
e.table.Current.Checked = True
End If
-- 发布时间：2009/10/19 13:45:00
--
还是不行！！！版主