Different Colors in Ritch / normal text box

Hi,
How can I use multiple different colors in a ritch or normal text box? I'm creating a Web Page Designer and I want to show the html code in a different color from the normal variabels. Please help me!

Greetings,
Philip Klop

Code:

---

    With RichTextBox1
    For x=0 to 10
      .SelText = "Color"
      .SelColor = Rnd * &h1000000
    Next x
    End With

---