Quando vou criar um ocx e vou criar uma propriedade pra alterar a font do controle eu posso fazer assim certo??

Public Property Set Fonte(ByVal New_Font As IFontDisp)
   Set Controle.Font = New_Font
   PropertyChanged "Fonte"
End Property

Public Property Get Fonte() As IFontDisp
 Set Fonte = Controle.Font
End Property

Mas desse jeito so esta alterando a fonte (ex: Arial, Verdana), mas não esta deixando negrito, italico...etc...

Como eu faço pra resolver isso??


vlw!