vfp 字体设置问题
Local oFont As StdFont oFont = Createobject('StdFont')
oFont.Name =Iif(Empty(页脚字体),"Verdana",页脚字体)
oFont.Size =Iif(页脚fontsize=0,9,页脚fontsize) ——怎么oFont.Size 变成货币型?按说应该是数值型啊

CLEAR oFont = CREATEOBJECT("StdFont") WITH oFont ? "Name = ", .Name, "Size = ", .Size, "VarType = ", VARTYPE(.Size) FOR nValue = 6 TO 40 .Size = nValue ? "Size = ", .Size NEXT ENDWITH RELEASE oFont RETURN