SelectionColor があるのは RichTextBox ですが
わざわざ RichTextBox1 の名前を TextBox1 に修正したのですか？
状況が分からない他人に質問するのですから、紛らわしい修正は
しない方がいいと思いますが。

つねに

TextBox1.Text += ("A")

する不思議なコードですが。。。

このコードだと最後のキーワード部分が選択状態となり、
そのまま入力すると選択部分を上書き入力してしまいます。
カーソルの位置を入力文字列の最終位置なり、ボタン押下
時にあった位置に戻しておくべきでは？

質問にある、入力文字列の最終位置の色変更ですが、
TextLength で入力文字列の長さが取れます。
そこから選択範囲の長さ０で Select できます。
その状態で SelectionColor を Black に変えるだけです。