关于弹出提示框的问题

jy00781671 · 发表于 2010-12-6 19:34:59

当文本框使用者准备填写下个文本框，但list值为空的的时候，弹出窗体message，如果不用宏，代码应该是怎么样，求教各位。

li08hua · 发表于 2010-12-6 21:56:10

If Me.List0 = "" Then
DoCmd.OpenForm "message"
End If

jy00781671 · 发表于 2010-12-6 22:22:19

回复 li08hua 的帖子

谢谢如果改下条件长度不为8，那么表达式是Length(list0)<>8是这样么

li08hua · 发表于 2010-12-6 22:34:28

看不懂你的Length是什么，如果list0是字符串，Me.List0<>Len（8）

lurong · 发表于 2010-12-6 22:52:00

本帖最后由 lurong 于 2010-12-6 23:02 编辑

关于窗口提示，试试这个！

li08hua · 发表于 2010-12-7 00:27:01

才发觉，更正一下，代码写反了，应为：Len（Me.List0）<>8

roych · 发表于 2010-12-7 01:21:09

在Test2里写上获取焦点事件：
Private Sub Text2_GotFocus()
If IsNull(Me.List0) Or Len(Me.List0) <> 8 Then
DoCmd.OpenForm "message"
Me.List0.SetFocus
End If
End Sub
试试看？

jy00781671 · 发表于 2010-12-7 18:09:55

谢谢各位的详细解释，我每个试了一遍发现都可以运行。谢谢帮助

szyuer · 发表于 2010-12-8 17:12:20

看不太明白,,,

leomen · 发表于 2010-12-21 20:56:59

ghfhffh

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

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

主题相关群

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

[窗体] 关于弹出提示框的问题

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

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