This example sets the color Red current with the CECOLOR system variable.
Application.SetSystemVariable("CECOLOR", "1")
Application.SetSystemVariable("CECOLOR", "1");
ThisDrawing.SetVariable "CECOLOR", "1"