Examples: UserDate property

The following example retrieves and displays the user date currently set in Microsoft Dynamics GP.

Private Sub UserDate_Click()
	Dim UserInfoObj As UserInfo
	Dim UserDate As Date

	'Get the UserInfo object
	Set UserInfoObj = VbaGlobal.UserInfoGet()

	'Retrieve and display the user date
	UserDate = UserInfoObj.UserDate
	MsgBox "Current date is: " + Str(UserDate)
End Sub

Documentation Feedback

---