Example

Sub IsDisplayRowsModifiable ()

With Session

'Dimension an integer for the return value

Dim changeable As Integer

 

'Find out if the Display Rows property is modifiable

changeable = .PropertyIsModifiable("DisplayRows")

 

'Display the results

If changeable Then

MsgBox "That property can be modified."

Else

MsgBox "You can't change that property."

End If

 

End With

End Sub