1

我正在寻找一种制作水印加法器的方法。这个想法是它使用打开的文件对话框加载图片,然后在图片上或图片下方添加水印!. 我正在寻找这是否可能以某种方式这是我的代码,但我总是得到错误

Dim Image1 As New Bitmap(OpenFileDialog1.FileName)
Dim Image2 As New Bitmap(PictureBox3.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
picturebox1.load(gresult) or picturebox1.load(result)

我对他们俩都有错误!

4

1 回答 1

1

picturebox1.Load(...)用于路径字符串,而不是图像或图形。

尝试使用

picturebox1.Image = Result
于 2013-05-13T16:06:12.467 回答