It prints out list of scenarios and their calculation settings, then changes one, then reprints..
CLS
PRINT "Before..."
for each SC in leap.Scenarios
print SC.ID & " " & SC.name & " " & SC.ResultsShown
next
leap.Scenarios("Mitigation").ResultsShown = false
REM or you could do..
REM leap.Scenarios("ID=11").ResultsShown = true
PRINT "After..."
for each SC in leap.Scenarios
print SC.ID & " " & SC.name & " " & SC.ResultsShown
next