设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1138|回复: 4
打印 上一主题 下一主题

[其它] 在窗体中添加了一个复选框通过判断复选框激活状态更改标题不成功

[复制链接]
跳转到指定楼层
1#
发表于 2012-3-24 22:53:45 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
从窗体中添加一个复选框,然后通过单击事件过程添加如下代码(代码是copy别人的),通过判断复选框激活状态true or false来更改Label标题,运行时点击复选框无变化,如果勾选了ACCESS选项 使用ACCESS特殊键会提示运行错误3265:这个集合找不到此项目,代码是copy别人的 他那个就能用不知道为什么,代码如下:
Private Sub Check47_Click()
Me.Recordset.Edit
If Me.Recordset.[Action] = True Then
Me.Recordset.[Action] = False
Me.Label48.Caption = "Browse"
Else
Me.Recordset.[Action] = True
Me.Label48.Caption = "Query"
End If
Me.Recordset.Update
End Sub
请老师们指点是什么问题呢

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
 楼主| 发表于 2012-3-24 23:32:49 | 只看该作者
Private Sub Check47_Click()
If Me.Check47.Value = False Then
Me.Label48.Caption = "Browse"

Else
Me.Check47.Value = True
Me.Label48.Caption = "Query"

End If
End Sub
改成这样就可以 但是我想上面那个是什么原因呢是[action]么 新人求老师们指导
3#
 楼主| 发表于 2012-3-26 14:27:26 | 只看该作者
roych 发表于 2012-3-25 22:10
改成以下试试:
Me.Recordset("Action")
前提是必须引用DAO360,并且有Action这个字段。最好还是传附件上 ...

可是我在别人做的工具里面没有找到有ACTION这样的字段呢
4#
发表于 2012-3-25 22:10:59 | 只看该作者
改成以下试试:
Me.Recordset("Action")
前提是必须引用DAO360,并且有Action这个字段。最好还是传附件上来看看。
5#
发表于 2012-3-27 09:32:19 | 只看该作者
shuiyush 发表于 2012-3-26 14:27
可是我在别人做的工具里面没有找到有ACTION这样的字段呢

上传附件看看吧。这样说不清问题
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-9-20 23:44 , Processed in 0.080330 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表