var oTView = pMe;var oFont = oTView.ScaleTime.LabelFont;oFont.Size = 8;oFont.Bold = true;oFont.Italic = true;oFont.Name = "MS Sans Serif";
Dim oTView, oFontSet oTView = pMeSet oFont = oTView.ScaleTime.LabelFontoFont.Size = 8oFont.Bold = trueoFont.Italic = trueoFont.Name = "MS Sans Serif"