The edit mode for the form.
object.EditMode
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfileForm interface |
Display some information about the form, including its edit mode.
Dim aForm
Dim aMessage
Set aForm = Profile.Form
aMessage = "Form Info: " & vbNewLine & vbNewLine &_
"- Caption: " & aForm.Caption & vbNewLine &_
"- Type Name: " & aForm.TypeName & vbNewLine &_
"- ID: " & aForm.ID & vbNewLine &_
"- Name: " & aForm.Name_ & vbNewLine &_
"- Height: " & aForm.Height & vbNewLine &_
"- Width: " & aForm.Width & vbNewLine &_
"- Is Modified: " & aForm.IsModified & vbNewLine &_
"- Edit Mode: " & aForm.EditMode
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Edit Mode cannot be found.