1

以前、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
4

1 に答える 1