| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 在窗体_表A中,选定行后将列对应的内容复制到窗体控件中 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28788) |
| -- 作者：zhangq8s -- 发布时间：2013/2/19 8:53:00 -- 在窗体_表A中,选定行后将列对应的内容复制到窗体控件中 我的方法是在表A的 PositionChanged 里加入也面的代码, Dim dr As DataRow = Tables("表A").Current.DataRow \'取得当前行的DataRow Forms("窗口1").Controls("Label3").text = dr("第一列") 但问题出现了,如果不在窗体,只在表A里时,点击就报错. 请问大侠们,在窗体事件内加入代码,得到这结果? |
| -- 作者：lin_hailun -- 发布时间：2013/2/19 8:55:00 -- 是否没有窗口没有被打开？ Dim dr As DataRow = Tables("表A").Current.DataRow \'取得当前行的DataRow If Forms("窗口1").Opened Then Forms("窗口1").Controls("Label3").text = dr("第一列") End IF |
| -- 作者：zhangq8s -- 发布时间：2013/2/19 8:57:00 -- 谢谢 lin_hailun 我先试一下. |
| -- 作者：zhangq8s -- 发布时间：2013/2/19 9:01:00 -- 谢谢 |