En VB, ¿cómo implementar un color de fuente aleatorio usando código?

Cree un control Time y un control Label1 con el siguiente código: Private?Sub?Form_Load()

Timer1.Interval?=?500

End?Sub

¿Privado?Sub?Timer1_Timer()

a?=?Int(Rnd?*?256)

b?=?Int(Rnd?*? 256 )

c?=?Int(Rnd?*?256)

Label1.ForeColor?=?RGB(a,?b,?c)

End?Sub

puede realizar el cambio de color aleatorio de la fuente del control Label1.