079绘制图像

    显示图像需要．NET的一个基类System.Drawing.lmage，Image实例表示一个图像。读取图像仅需使用一行代码：
                      Dim img As Image = Image.FromFile("FileName")
示例：显示图像的过程。
(l)创建一个Windows窗体应用程序Displaylmage。
(2)在窗体底部添加一个按钮和OpenFileDialog对话框。
(3)双击按钮，添加如下的代码。

Public Class Form1
    Private image As Image
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OpenFileDialog1.Filter = "图像(*.bmp;*.jpg,*.gif)|*.bmp;*.jpg;*.gif|所有文件(*.*)|*.*"
        If OpenFileDialog1.ShowDialog = DialogResult.OK Then
            image = image.FromFile(OpenFileDialog1.FileName)
        End If
    End Sub

    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        If image IsNot Nothing Then
            Dim dc As Graphics = e.Graphics
            'dc.DrawImage(image, ClientRectangle)
            Dim myBrush As Brush = New TextureBrush(image, New Rectangle(0, 0, image.Width, image.Height))
            dc.FillEllipse(myBrush, ClientRectangle)

        End If
    End Sub

End Class

需要最小化一下，再恢复窗口才能看到效果