AutoSaveInterval property example

Private Sub AutoSaveExample()

     'This example obtais the AutoSaveInterval property.

     Dim myobj As ApplicationPreferences

     Set myobj = IntelliCAD.Preferences

     MsgBox "Save Interval: " & myobj.AutoSaveInterval

End Sub