关于文本框问题

一点通 · 发表于 2006-8-29 05:32:00

要达到什么目的?更新表数据?还是用于显示?

一点通 · 发表于 2006-8-29 07:03:00

Private Sub Text0_AfterUpdate()
If IsNull(DLookup("[加工单位名称]", "Sheet1", "[加工单位编号]='" & Text0 & "'")) Then
MsgBox "找不到对应的数据"
Else
Me.Text2 = DLookup("[加工单位名称]", "Sheet1", "[加工单位编号]='" & Text0 & "'")
End If
End Sub

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

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

主题相关群

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

[与其它组件] 关于文本框问题

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