This example shows how to use Index = 62, cbRunAlertLevel.
' Set Crystal Ball to show only important alerts
CB.RunPrefsND cbRunAlertLevel, cbRunAlertShowImportant
' Set Crystal Ball to show all alerts, and reset all
'"Do not show again" alert dialog checkboxes
CB.RunPrefsND cbRunAlertLevel, cbRunAlertShowAll, True