I am trying to get a font of a label to change to times new roman when an option button is clicked, i have tried this

Private Sub optHigh_Click()
lblHeading.FontName=Times New Roman

End Sub

This is wrong but i cant work out how to get the font to change, can anyone help please