关于Enter键的困惑！！

kcul

为了使Enter键的功能等价于某个按钮，我作如下操作：
      Private Sub key_KeyPress(KeyAscii As Integer)

         If (KeyAscii = 13) Then
             Call 登录_Click
         End If

      End Sub
其中，key是一个密码输入的文本框，登录_Click是密码输入后点击按钮“登录”的一个Sub。可是无法实现预计的功能，请问为何？文本框key的属性中“Enter键行为”一项为何只有两个选项：默认值、字段中新行，是不是这个缘故？该如何解决？请不吝赐教，谢谢！

haixing

将密码输入的文本框的Tab次序设在按钮“登录”的前面，再
Private Sub 登录_GotFocus()　'按钮“登录”获得焦点
    Call 登录_Click
End Sub

kcul

先谢谢2楼的指点，仍有问题：无法执行“doCmd.Close”，即在登录后打开一个新窗体的同时关闭这个登录窗体，再次请教！！

宿命的风

可能是表达不清楚，把你的库传上来看一下好吧！~

zhengjialon

……
docmd.openforms "formname"
docmd.close acform ,"formname"
……

jzwwpp

把健预览设置为是

kcul

谢谢各位指点，我把程序的BUG再说清楚些：
按我的设计意图，用户登录后，系统关闭登录窗体而弹出新窗体，因此语句
docmd.close acform ,"formname" 应放在 Sub  ”登录_Click“中，但是只要在代码中加入
        Private Sub 登录_GotFocus()　
              Call 登录_Click
        End Sub
就出现BUG了——”处理窗体时不能执行该操作！“  请问为何？？

Trynew

zhengjialon

Trynew：
你终于露面了，少了你好像少了点什么，呵呵

kcul

Thanks for the solution from Trynew !!