16,554
社区成员
发帖
与我相关
我的任务
分享
Dim g As Graphics
Dim objbmp As New Bitmap(200, 300, System.Drawing.Imaging.PixelFormat.Format24bppRgb)
g = Graphics.FromImage(objbmp)
g.DrawString("中国", New Font("楷体_GB2312", 40), Brushes.Blue, 0, 8)
objbmp.Save("c:\222.bmp")
g.Dispose()
PictureBox1.Image = objbmp