auto capitalized after bullets

i set the bullet with this code

Code:

---

rtbTranscription.SelectionBullet = True

---

but how can i make the first letter to be capitalized automatically after the bullet?