The status of the form.
| 0 | fsNone |
| 1 | fsIncomplete |
| 2 | fsComplete |
| 3 | fsLoaded |
| 4 | fsDuplicate |
| 5 | fsFailed |
| 6 | fsInvalid |
| 7 | fsSent |
| 8 | fsHeld |
| 9 | fsReceipted |
| 10 | fsInactive |
| 11 | fsPaid |
object.FormStatus
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISProfileForm interface |
int
Display some information about the form, including its status.
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 &_
"- Activate Priority: " & aForm.ActivatePriority & vbNewLine &_
"- Form Status: " & aForm.FormStatus & vbNewLine
Profile.MsgBox(aMessage) In Profile Client v8 on User Interface Form Status cannot be found.