GetString Example
Sub Example_GetSting()
' This example uses GetString to return the SurfaceLayer
' for PreferencesSurface.
Dim surfPref As AeccPreferencesSurface
Set surfPref = AeccApplication.ActiveProject.preferences.Surface
MsgBox "The value for SurfaceLayer is " & surfPref.GetString(kSurfaceLayer) , vbInformation, "GetString Example"
End Sub