how do i set the font of a rich text box to microsoft sans serif, size 12 font, color black? This is of course after you click a button.

heres what i have so far:
rtxtPersonalPad.Font = ?
rtxtPersonalPad.Color = ?

In the button click event:

Dim fnt As Font
rtxtPersonalPad.ForeColor = Color.Black
fnt = New Font("Sans Serif", 12, FontStyle.Regular)
rtxtPersonalPad.Font = fnt

thanks so much!

you're the greatest! <3