GDI+如何写不是斜体的文字
我找了个例子，用GDI+在窗体上写文字。
代码如下：
Dim fontfam As Long, strformat As Long, curFont As Long, rclayout As RECTF
Private Sub Form_Load()
InitGDIPlus
GdipCreateFromHDC Me.hDC, Graphics
GdipCreateFontFamilyFromName StrPtr("黑体"), 0, fontfam
GdipCreateStringFormat 0, 0, strformat
GdipCreateSolidFill &HFFFF0000, Brush
GdipSetStringFormatAlign strformat, StringAlignmentNear
GdipCreateFont fontfam, 15, FontStyle.FontStyleItalic, UnitPixel, curFont
GdipSetTextRenderingHint Graphics, TextRenderingHintClearTypeGridFit
rclayout.Left = 100
rclayout.Top = 100
rclayout.Right = 150
rclayout.Bottom = 150
GdipDrawString Graphics, StrPtr("Hellow world! 这是我们第一个GDI+文字~!!"), -1, curFont, rclayout, strformat, Brush
End Sub

Private Sub Form_Unload(Cancel As Integer)
GdipDeleteFontFamily fontfam
GdipDeleteStringFormat strformat
GdipDeleteFont curFont
GdipDeleteBrush Brush
GdipDeleteGraphics Graphics '释放graphics占用的内存
TerminateGDIPlus
End Sub
可是字是斜体的，如何写不是斜体的字？
应该如何修改参数？谢谢！
[最优解释]
该回复于2012-12-08 14:13:03被管理员删除
[其他解释]
讨厌！我真的不知道。谢谢！
[其他解释]
发错了。哪位大侠知道？望告知。谢谢！
[其他解释]
GdipCreateFont fontfam, 15, FontStyle.FontStyleRegular, UnitPixel, curFont
改成这样就好了。
liuyh7788
小样！