This example asks users whether they want white text on a blue background and presents Yes and No buttons for their response.
If MsgBox("Do you want white on blue?", 36, _
"BlueScreen?") = vbYes Then
Options.BlueScreen = True
Else
Options.BlueScreen = False
End If