Office中国论坛/Access中国论坛

标题: [求助]文本框怎么赋值？ [打印本页]

作者: z110120 时间: 2007-3-10 20:12
标题: [求助]文本框怎么赋值？
Private Sub Text22_BeforeUpdate(Cancel As Integer)

Me.Text22.ControlSource = Forms!窗体查询!Combo9.Column(2)
End Sub

加了这段语句后反应都没有

作者: z110120 时间: 2007-3-10 20:29
Private Sub Text22_BeforeUpdate(Cancel As Integer)
Dim str As String
str = "select 单位代码.单位名称 from 单位代码 where 单位代码.单位代码 like '*" & Me.Combo9 & "*'"
Me.Text22.ControlSource = str
End Sub

也不行，combo9就是用来选择单位代码的，高手帮忙

作者: tz-chf 时间: 2007-3-10 20:47
文本框写入记录集作什么

作者: 一点通 时间: 2007-3-10 21:25
请上传示例加以说明

作者: z110120 时间: 2007-3-11 01:39
combo9用来选择单位，但显示出来的只有单位的代码，没有单位名称

所以又加了个文本框，想显示combo9所选的单位代码，在表'单位代码'所对应的单位名称

作者: 4420 时间: 2009-11-5 01:30

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)