已知标准字体:
  dim Sfont as new Stdfont
    sfont.size=12
    sfont.name="宋体"
    
创建字体:
 Dim Nheight as long,Myfont as long
  Nheight=12
  Myfont=CreateFont(Nheight, 0, 0, 0, FW_NORMAL, False, False, False, DEFAULT_CHARSET,   OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH, Nname)问题:
  sfont宋体的大小比mfont的要大。如何才能使他们一样大呢?