在access模块中不能使用窗体的单击事件吗？

jianjunkf

很多关于access的书上在介绍模块VBA的使用时，都举例应用了窗体的单击事件，例如：Private Sub Form_Click()
Dim x As Single,y As Single

x=InputBox("请输入购物款")


x=Val(x)

Select Case x

Case Is<1000

y=x

Case Is<2000

y=0.95*x
      ...，但是窗体的单击事件似乎在access数据库中不能使用。打开和代码相对应的窗体时，鼠标单击窗体，无任何反应！可见窗体的单击事件在access的窗体并不可用，可为什么还有很多相关access的书在模块的相关章节中在举例使用这个窗体的单击事件呢？

andymark

不是不能用,也许你用错地方,或用错事件了

huangqinyong

可能性是LZ写完代码后,没有激活单击事件吧

jianjunkf

huangqinyong 发表于 2010-12-2 14:10
可能性是LZ写完代码后,没有激活单击事件吧

窗体的load事件，在窗体中添加command控件后的click事件均能用，就是form_click事件无效，在窗体对象中的视图中选中窗体视图，单击该窗体无反应！是否可以确定在vb中可以的窗体单击事件在access中不行呢？

jianjunkf

麻烦请管理员举一个能够运行的窗体单击事件的代码来，谢谢!

zyp

窗体的单击事件是有的,但很难被激发．因为窗体页眉／页脚／主体都有自己的单击事件，只有在这些区域之外单击才能激发．

建议在窗体页眉／页脚／主体上写单击事件．而且只能在没有被其它对像盖住的空白处单击才能激发事件的

aslxt

“form_click（）”事件在记录选择器（就是窗体左面的竖条）上体现，是可用的。
一般意义的窗体单击事件可用“主体_Click()”代替

jianjunkf

回复 aslxt 的帖子

刚才试过了，确实，窗体的单击事件只能在记录选择器上有效，在窗体其它任何位置是无效的，这一点是和visual  basic的不同之处。

sgrshh29

jianjunkf 发表于 2010-12-3 15:33
回复 aslxt 的帖子

刚才试过了，确实，窗体的单击事件只能在记录选择器上有效，在窗体其它任何位置是无效的 ...

只在窗体上单击有效,其它部位当然无效.你可以试试单击附件中窗体的上半部和下半部看看.