The property is True if the form is automatically resized to fit its contents.
object.AutoSize
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfileForm interface |
bool
Display AutoSize for the form.
Dim aForm
Dim aFormInfo
Set aForm = Profile.Form
aForm.AutoSize = true
aFormInfo =_
"Caption: " & aForm.Caption & vbNewLine &_
"ShortName: " & aForm.ShortName & vbNewLine &_
"TypeName: " & aForm.TypeName & vbNewLine &_
"Top: " & aForm.Top & vbNewLine &_
"Left: " & aForm.Left & vbNewLine &_
"Width: " & aForm.Width & vbNewLine &_
"Height: " & aForm.Height & vbNewLine &_
"Auto Size: " & aForm.AutoSize
Profile.MsgBox(aFormInfo)
In Profile Client v8 on User Interface Auto Size cannot be found.