Dim bmp As new Bitmap(getImage("d:\test.jpg"))Dim g = Graphics.FromImage(bmp)
Dim fnt As New Font("宋体",20)Dim msg As String = "测试"g.DrawString(msg,fnt,Brushes.Red,0,0)
bmp.save("d:\test2.jpg")