Мне нужно, чтобы добавить больше вариантов при выполнении программного обеспечения для распознавания голоса, используя VB.NET

---

Привет,
Я пытаюсь разработать программу распознавания голоса с помощью vb.net-да. Мой вопрос заключается в том, как я могу добавить "paint" в commandchoices во время выполнения, когда нажата кнопка.

Dim commandChoices As New Choices("wordpad", "notepad", "word")

Мне нужно добавить/добавить "paint"к этой строке, когда кнопка нажата во время выполнения.

Пожалуйста, помогите мне с образцом кода.

Что я уже пробовал:

recog = New SpeechRecognitionEngine()
recog.SetInputToDefaultAudioDevice()
recog.RecognizeAsyncStop()
recog.UnloadAllGrammars()

---form load event---
Dim commandChoices As New Choices("wordpad", "notepad", "word")
Dim grammarBuilder As New GrammarBuilder(New Choices("open", "close", "Hello"))
grammarBuilder.Append(commandChoices)
Dim commandChoices1 As New Choices("google", "facebook", "yahoo", "apple")
Dim grammarBuilder1 As New GrammarBuilder(New Choices("goto"))
grammarBuilder1.Append(commandChoices1)
Dim grammarbuilder2 As New GrammarBuilder(New Choices("Calculator", "TaskManager", "MyComputer", "CommandPrompt", "C-Panel", "D-Drive", "C-Drive"))
Dim g As New Grammar(New Choices(grammarBuilder, grammarBuilder1, grammarbuilder2))
g.Name = "Available programs"
recog.LoadGrammarAsync(g)
recog.RecognizeAsync(RecognizeMode.Multiple)


AddHandler recog.AudioLevelUpdated, AddressOf Me.auevent
AddHandler recog.SpeechRecognized, AddressOf Me.recevent
AddHandler recog.SpeechRecognitionRejected, AddressOf Me.recfailevent

---