Office中国论坛/Access中国论坛

标题: 请解释一下代码,和两个选项控件的作用? [打印本页]

作者: ccczzz    时间: 2003-12-30 01:55
标题: 请解释一下代码,和两个选项控件的作用?
请解释一下代码,和两个选项控件的作用?[attach]2955[/attach]
作者: cg1    时间: 2003-12-30 08:22
其实控件根本没有什么用,不过是用来保存控制变量的,你可以用文本框或者其他的来代替,不过用CHECK比较合适这样的情况。

主要代码是

Private Sub Field3_KeyDown(KeyCode As Integer, Shift As Integer)

ShiftDown = (Shift And SHIFT_MASK) > 0
If OnOff Then
    If KeyCode = Key_Tab Then
        If ShiftDown = 0 Then
            KeyCode = 0
            Me!Sub1.SetFocus
            DoCmd.GoToControl "Field0"
        End If
    ElseIf KeyCode = Key_Return Then
        KeyCode = 0
        Me!Sub1.SetFocus
        DoCmd.GoToControl "Field0"
    Else: Exit Sub
    End If
End If


End Sub
作者: ccczzz    时间: 2003-12-30 15:26
把选项控键删除后,tab键就不能从子窗体退出进入主窗体,选项控键的作用在哪里?请指点,谢谢




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3