WebBrowserの内容を.jpgに保存するには(.NET)? (ID:92290)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 前に述べた方法で必要な部分をPictureBoxの左上隅に移動させ、新たに必要な部分の大きさのBitMapを作成し書き込むことで解決しました。 いろいろなご意見ありがとうございました。 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim bitmap As Bitmap = New Bitmap(PictureBox1.Width, PictureBox1.Height) PictureBox1.Image = bitmap End Sub Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) _ Handles Button1.Click Dim x, y As Integer Dim myValue As Color 'ビットマップ画素値 Dim myColor As Color 'カラー構造体 Dim v As Long 'ビットマップ画素値バッファ Dim bmap1, bmap2 As Bitmap 'ビットマップ構造体 bmap1 = PictureBox1.Image bmap2 = New Bitmap(640, 480) For x = 0 To 640 - 1 For y = 0 To 480 - 1 myValue = bmap1.GetPixel(x, y) v = myValue.ToArgb() myColor = Color.FromArgb(v) bmap2.SetPixel(x, y, myColor) Next Next bmap2.Save("result.jpeg", System.Drawing.Imaging.ImageFormat.Jpeg) End Sub