有九个与选项相关的对象，每个对象分别代表“选项”对话框中的一个选项卡。通过这些对象可以访问“选项”对话框中所有存储在注册表中的选项，可以使用这些对象的特性来自定义许多 AutoCAD 设置。这些对象包括
- PreferencesDisplay
- PreferencesDrafting
- PreferencesFiles
- PreferencesOpenSave
- PreferencesOutput
- PreferencesProfiles
- PreferencesSelection
- PreferencesSystem
- PreferencesUser
可以通过 Preferences 对象访问这些对象。要访问 Preferences 对象，请使用 Application 对象的 Preferences 特性：
Dim acadPref as AcadPreferences
Set acadPref = ThisDrawing.Application.Preferences
然后可以使用 Display、Drafting、Files、OpenSave、Output、Profile、Selection、 System 和 User 特性来访问任何特定的 Preferences 对象。
Sub Ch2_PrefsSetCursor()
' 本例设置 AutoCAD 图形光标的十字光标
' 设置为全屏。
' 访问 Preferences 对象
Dim acadPref As AcadPreferences
Set acadPref = ThisDrawing.Application.Preferences
' 使用 CursorSize 特性设置十字光标的大小
acadPref.Display.CursorSize = 100
End Sub
Sub Ch2_PrefsSetDisplay()
' 本例使用 DisplayScreenMenu 和 DisplayScrollBars 特性
' 分别启用屏幕菜单和禁用
' 滚动条。
' 访问 Preferences 对象
Dim acadPref As AcadPreferences
Set acadPref = ThisDrawing.Application.Preferences
' 显示屏幕菜单并禁用滚动条
acadPref.Display.DisplayScreenMenu = True
acadPref.Display.DisplayScrollBars = False
End Sub