我之前曾问过一种使用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
答案 0 :(得分:1)