Office中国论坛/Access中国论坛

标题: 关于文本框问题 [打印本页]

作者: wonderfeng 时间: 2006-8-29 03:42
标题: 关于文本框问题
附件中窗体2 实现 text0 输入A text2 则显示 "厂1"

…………依次类推

当输入不在表sheet1中的记录时会报错！如何解决？[attach]20043[/attach]

作者: 一点通 时间: 2006-8-29 05:32
要达到什么目的?更新表数据?还是用于显示?

作者: wonderfeng 时间: 2006-8-29 05:57
能显示在form中就可以了！

能不能加个判断语句，如果在这表中则执行

不在的话就提示是否需要添加！

作者: 一点通 时间: 2006-8-29 07:03
Private Sub Text0_AfterUpdate()
If IsNull(DLookup("[加工单位名称]", "Sheet1", "[加工单位编号]='" & Text0 & "'")) Then
MsgBox "找不到对应的数据"
Else
Me.Text2 = DLookup("[加工单位名称]", "Sheet1", "[加工单位编号]='" & Text0 & "'")
End If
End Sub

作者: wonderfeng 时间: 2006-8-29 07:57
谢谢！明天上班了去试试

还有一个问题：按钮能不能实现功能: 点一下清空窗体里的文本框

再点一下退出该窗体

作者: wonderfeng 时间: 2006-8-29 08:09
谢谢！明天上班了去试试

还有一个问题：按钮能不能实现功能: 点一下清空窗体里的文本框

再点一下退出该窗体

作者: wonderfeng 时间: 2006-8-29 18:27
直接退出，而不保存用什么语句

好像试着

docmd.close,,acsaveno也还是会保存到表里的，怎么回事？

作者: andymark 时间: 2006-8-29 19:29
邦定控件的，可以参考下面的例子的写法

[attach]20052[/attach]

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