窗体记录问题

cangqiong · 发表于 2008-1-31 10:49:29

请高手指点

咱家是猫 · 发表于 2008-1-31 10:56:08

请简单说明具体问题

cangqiong · 发表于 2008-1-31 10:59:19

项目备注
其他内容
新人实习
新人训练

如果项目是 "其他内容" 则备注一定要填写如果不填不让填写下一条记录
如果项目不是 "其他内容" 则备注可以填也可以不填.

cangqiong · 发表于 2008-1-31 11:00:51

请看附件....的内容..谢谢

咱家是猫 · 发表于 2008-1-31 11:19:42

Private Sub Form_BeforeUpdate(Cancel As Integer)

If Me.损失项目 = "其他内容" Then
      If IsNull(Me.备注) Then
         MsgBox "因为你选择的是其他内容，请把具体内容输入到备注栏。"
         Cancel = True
      End If
End If

End Sub

dreamice01 · 发表于 2008-1-31 11:22:49

在项目所在控件的AFTERCHANGE事件中写这个代码就可以吧

if 项目="其它内容"  then
if isnull(备注) then
   msgbox"必填"
   备注.setfocus
endif

end if

cangqiong · 发表于 2008-1-31 11:26:29

谢谢!!!非常感谢!!!

cangqiong · 发表于 2008-1-31 12:11:52

还想问个问题....如果是 "其它内容" 框变成红色如果不是 "其他内容 "变成黄色
语名怎么写

咱家是猫 · 发表于 2008-1-31 14:23:07

条件格式
If Me.损失项目 = "其他内容" Then
      If IsNull(Me.备注) Then
         If Not isnull(0810) and Not isnull(0802) then
               MsgBox "因为你选择的是其他内容,且月份已填写内容，请把具体内容输入到备注栏。"
               Cancel = True
         End If
      End If
End If

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

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

主题相关群

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

[窗体] 窗体记录问题

本帖子中包含更多资源

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