水印上的文字如何实现 从左下到右上的倾斜？急。

Question

Public Sub BuildWater(ByVal sourcepath As String, ByVal outpath As String)        Dim image As Image = image.FromFile(sourcepath)
        Dim bitWaterMark As New Bitmap(image.Width, image.Height)
        Dim g As Graphics = Graphics.FromImage(bitWaterMark)
        g.DrawImage(image, 0, 0, image.Width, image.Height)        Dim f As New Font("华文琥珀", 10)
        Dim b As Brush = New SolidBrush(Color.Orange)
        Dim addtext As String = "CRM"
        g.DrawString(addtext, f, b, CSng(image.Width - image.Width / 4), CSng(image.Height - image.Height / 10))
        g.Dispose()
        image.Dispose()
        bitWaterMark.Save(outpath)
        bitWaterMark.Dispose()    End Sub想实现CRM三个字母的倾斜（左下到右上），如何实现？

Answer 1

好象有个控制角度的，以前用过