Public Sub New ( _
    phrase As String _
)

Dim phrase As String

Dim instance As New GrammarBuilder(phrase)

public GrammarBuilder(
    string phrase
)

public:
GrammarBuilder(
    String^ phrase
)

public function GrammarBuilder(
    phrase : String
)

private Grammar CreateGrammarBuilderRGBSemantics(params int[] info) {
    //Create a set of choices, each  a lookup from a color name to RGB
    //Choices constructors do not take SematicResultValue, so cast SematicResultValue to GramarBuilder
    Choices colorChoice = new Choices();
    foreach (string colorName in System.Enum.GetNames(typeof(KnownColor))) {
        colorChoice.Add((GrammarBuilder)
                                (new SemanticResultValue(colorName, Color.FromName(colorName).ToARGB())));
    }

    GrammarBuilder choiceBuilder = new SemanticResultKey("RGB", colorChoice);
    //Create two intermediate grammars with introductory phrase and the color choice
    GrammarBuilder makeBackgroundBuilder = "Make background";
    //Uses implicit conversion of SystemString to GrammarBuilder
    makeBackgroundBuilder.Append(choiceBuilder);
    GrammarBuilder configureBackgroundBuilder = new GrammarBuilder("Configure background as");
//Construct GrammarBuilder from string.
    configureBackgroundBuilder.Append(new SemanticResultKey("RGB", colorChoice));

    //Create the final grammar, which recognizes either intermediate grammar
    Grammar grammar = new Grammar(new Choices(makeBackgroundBuilder, configureBackgroundBuilder));
    /
    grammar.Name = "Make Background /Configure background as";

    return grammar;
}