Change caption : Form « Forms « VBA / Excel / Access / Word

Change caption


Sub ChangeCaption(frmAny As Form)
   If IsNull(frmAny.Caption) Then
      frmAny.Caption = "Form For - " & CurrentUser
      frmAny.Caption = frmAny.Caption & " - " & CurrentUser
   End If
End Sub


Related examples in the same category

1.Display form in Modal mode
2.Close a form
3.To remove the Userform from the computer's memory, you must use the Unload statement; otherwise, the Userform is only hidden.
4.Creating UserForms Programmatically
5.Adding Controls to a UserForm at Design Time
6.Output form to html file
7.Using the Show Method to Display a Form
8.Loading a Form into Memory Prior to Displaying It
9.Cancels a cancelable event (an event that has a Cancel parameter).
10.Open a form, format the fonts and close it
11.Format fonts
12.Form count