VB.NET水印图片

时间:2013-05-14 07:40:41

标签: vb.net image watermark

我之前曾问过一种使用visual basic为图片添加水印的方法。并且感谢每个人我设法找到一种方法,但现在看来我需要一个选项代码,让用户选择图片上新水印位置的坐标。

这是我的代码

Dim Image1 As New Bitmap(OpenFileDialog1.FileName)
Dim Image2 As New Bitmap(PictureBox1.Image)
Dim Result As New Bitmap(Math.Max(Image1.Width, Image2.Width), _
    Image1.Height + Image2.Height)
Dim gResult As Graphics = Graphics.FromImage(Result)
gResult.DrawImage(Image1, New Point(0, 0))
gResult.DrawImage(Image2, New Point(0, Image1.Height))
gResult.Dispose()
gResult = Nothing


PictureBox5.Image = Result

1 个答案:

答案 0 :(得分:1)

我发现了一种方法。您可以使用2个图片框并添加代码来移动水印图片框。你可以使用截图方法在最后保存所有内容。