Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

窗体文本框值绑定

luoqin  发表于:2010-12-07 14:31:55  
复制

大家看看这个数据库的窗体2,在窗体2的子窗体中当鼠标选中某条记录时,在上面的文本框中就显示这些信息,见上图,这个效果具体怎么实现?谢谢点击下载此附件

 

 

Top
煮江品茶 发表于:2010-12-07 15:05:44

这玩意就是主窗体控件读子窗体控件值问题。比如主窗体控件a要等于子窗体控件a,可以在子窗体的“成为当前”事件中写:

Private Sub Form_Current()
Me.a.Value = Me.Parent.Form.Controls("a").Value
End Sub

 

 



netguestcn 发表于:2010-12-07 22:22:16

在子窗体的“成为当前”事件中写:

Private Sub Form_Current()
Forms![窗体2]![Text0] = Me![a]
Forms![窗体2]![Text4] = Me![b]
Forms![窗体2]![Text2] = Me![c]
Forms![窗体2]![Text6] = Me![d]
Forms![窗体2]![Text8] = Me![e]

End Sub

 

点击下载此附件

jia 发表于:2010-12-08 07:50:53

在子窗体的“成为当前”事件中写:

Private Sub Form_Current() '文本框与子窗口同步

On Error Resume Next

If Not Me.Parent.Form.Recordset Is Me.Recordset Then

Set Me.Parent.Form.Recordset = Me.Recordset

End If

End Sub

这样对文本框多的特别方便

点击下载此附件

总记录:3篇  页次:1/1 9 1 :