F Frazzled Guest Jun 6, 2002 #1 I'm trying to get a module to display a message that has the form name and the current date. I want the the funtion to run when I open any of the forms.How can I get this to work correctly?
I'm trying to get a module to display a message that has the form name and the current date. I want the the funtion to run when I open any of the forms.How can I get this to work correctly?
S scottfarcus Registered User. Local time Today, 00:01 Joined Oct 15, 2001 Messages 182 Jun 6, 2002 #2 In your module, create a public sub procedure... Public Sub DisplayForm(FormName As String, Today As Date) MsgBox "Form Name: " & FormName & vbCrLf & vbCrLf & "Today's Date: " & Today End Sub In the OnOpen event of each form, place the following code... Call DisplayForm(Me.Name, Date)
In your module, create a public sub procedure... Public Sub DisplayForm(FormName As String, Today As Date) MsgBox "Form Name: " & FormName & vbCrLf & vbCrLf & "Today's Date: " & Today End Sub In the OnOpen event of each form, place the following code... Call DisplayForm(Me.Name, Date)