I have the following code in a module which is set to Execute when the Database opens.
---------------------------
Function HelloKaren()
Dim MyDate As Date
Dim Noon As Date
MyDate = Time
Noon = #12:00:00 PM#
If MyDate < Noon Then
MsgBox "Good Morning Karen", vbOKOnly, "Welcome Karen"
Else
MsgBox "Good Afternoon Karen", vbOKOnly, "Welcome Karen"
End If
End Function
------------------------------------
It works fine.
I was just wondering if there was anyway to add code that would open up my Form_MinaMenu as part of this function. Instead of me having to specify it in the Tools, Startup, Display Form/Page box in the Toolbar.
---------------------------
Function HelloKaren()
Dim MyDate As Date
Dim Noon As Date
MyDate = Time
Noon = #12:00:00 PM#
If MyDate < Noon Then
MsgBox "Good Morning Karen", vbOKOnly, "Welcome Karen"
Else
MsgBox "Good Afternoon Karen", vbOKOnly, "Welcome Karen"
End If
End Function
------------------------------------
It works fine.
I was just wondering if there was anyway to add code that would open up my Form_MinaMenu as part of this function. Instead of me having to specify it in the Tools, Startup, Display Form/Page box in the Toolbar.