ISProfileForm.User

Description

The user of the form.

Syntax

object.User

Part	Attribute	Type	Description
`object`	Required	ISProfileForm	The `object` always implements the ISProfileForm interface

Restriction: This property is readonly.

Return Value

ISProvider

Example

Display some information about the form, including the full name of the its user.

Dim aForm
Dim aFormInfo
Dim aUser

Set aForm = Profile.Form
set aUser = aForm.User

aFormInfo =_
  "Short Name: " & aForm.ShortName & vbNewLine &_
  "TypeName: " & aForm.TypeName & vbNewLine
  
if aUser is nothing then 
  aFormInfo = aFormInfo & "User not defined"
else    
  aFormInfo = aFormInfo &  "Form User: " & vbNewLine & aUser.FullName
end if
Profile.MsgBox(aFormInfo)

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface User cannot be found.

Version information

Added in v7.8.0