(请教广大)这功能如何实现呢，

westwind02

这两个问题实在不懂，望方家能指教啊
急，特别请“广大”进来看看

徐阿鹏

westwind02

日期那个是这样的阿，可是那个界面的还是没有跳到我想要的那个窗口还是只出现原来的那个话框“欢迎进入大一男生界面”我想要能出现这个界面后能直接进入到那大一男生信息录入窗口，可以吗。另个一个那出现那记录只能输入一次，如果我想的是如9,7那位学生做了值日的事，9,8号他做了实习什么的，就是说这个记录可以得输入两次可以保存的信息，不知可否做到，如何做呢

风鸣

Private Sub 组合_年级_AfterUpdate()

    With Me

       If IsNull(.组合_性别) = False And IsNull(.组合_年级) = False Then
   
           Select Case .组合_性别 & .组合_年级
   
           Case "男大一"
               MsgBox "进入大一男生界面"
               DoCmd.OpenForm "大一男生界面"
           Case "男大二"
               MsgBox "进入大二男生界面"
               DoCmd.OpenForm "大二男生界面"
           Case "女大二"
               MsgBox "进入大二女生界面"
               DoCmd.OpenForm "大二女生界面"
           End Select
      
       End If
   
    End With

End Sub

不知为什么用Private Sub 组合_年级_BeforeUpdate()

westwind02

谢谢 风鸣了，，感谢

广大

看看代码，其实很简单，可以把对话框的一句改成打开相应的窗体就是了。

广大

当然也可以不用updata事件，加一个命令按钮，用click事件也可以。
用宏也比较容易实现的。