VB.NET PictureBox 控件

2025年3月17日 | 阅读 3 分钟

PictureBox 控件用于在 Windows 窗体上显示图像。PictureBox 控件有一个 image 属性，允许用户在运行时或设计时设置图像。

让我们按照以下步骤在 VB.NET Windows 窗体中创建一个 PictureBox 控件。

步骤 1： 我们必须从工具箱中找到 PictureBox 控件，然后将 PictureBox 控件拖放到窗口窗体上，如下所示。

步骤 2： 将 PictureBox 添加到窗体后，我们可以通过单击 PictureBox 控件来设置图像的各种属性。

PictureBox 的属性

以下是 VB.NET PictureBox 控件的属性。

属性	描述
BackColor	它用于设置窗口窗体中 PictureBox 的背景颜色。
BackgroundImage（背景图片）	它用于通过在图片框中设置或获取值来设置窗口窗体的背景图像。
ErrorImage	当在窗口窗体上加载图像时发生错误时，ErrorImage 属性用于显示图像。
InitialImage	InitialImage 用于在 PictureBox 控件中加载主图像时显示图像，方法是在 PictureBox 控件中设置一个值。
WaitOnLoad	它表示 PictureBox 控件中的特定图像是否已同步。
文本	它用于为窗口窗体中的图片框控件设置文本。
图像	image 属性用于在 Windows 窗体的 PictureBox 上显示图像。
BorderStyle	它用于设置 Windows 窗体中图片框的边框样式。
ImageLocation	它用于设置或获取显示在窗口窗体图片框上的图像的路径或 URL。
IsMirrored	它获取一个值，该值确定图片框控件是否已镜像。

PictureBox 控件的方法

方法	描述
CancelAysnc()	CancelAsync 方法用于取消 PictureBox 控件中的异步图像加载。
CreateHandle()	它用于为窗口窗体中的图片框控件创建句柄。
DestroyHandle()	它用于销毁与图片框控件关联的所有句柄。
GetStyle()	GetStyle() 方法用于获取 PictureBox 控件中指定位样式的的值。
Load()	Load() 方法用于使用 ImageLocation 属性从控件加载指定的图像。
LoadAsync(String)	它用于异步加载图片框控件指定位置的图像。

PictureBox 控件的事件

以下是 VB.NET PictureBox 控件的一些事件。

事件	描述
BackColorChanged	当 PictureBox 控件中 backcolor 属性的值发生变化时，会发生此事件。
BackgroundImageLayoutChanged	当 PictureBox 控件中 BackgroundImage 的属性值发生变化时，会发生此事件。
ContextMenuChanged	当 PictureBox 控件中 ContextMenu 的属性发生变化时，会发生此事件。
Resize	当图片框控件发生变化时，会发生调整大小事件。

此外，我们还可以参考 VB.NET Microsoft 文档以获取 VB.NET 中 PictureBox 控件属性、方法和事件的完整列表。

让我们创建一个程序来在 VB.NET 窗体中显示图像。

Picturebx.vb

Public Class Picturebx
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        'Dim Str As String = "C:\Users\AMIT YADAV\Desktop\"
        PictureBox1.Image = Image.FromFile("C:\Users\AMIT YADAV\Desktop\jtp2.png")
        PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage
        PictureBox1.Height = 250
        PictureBox1.Width = 400
        Label1.Visible = False
    End Sub
    Private Sub Picturebx_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Text = "javaTpoint.com" 'Set the title name for the form
        Button1.Text = "Show"
        Label1.Text = "Click to display the image"
        Label1.ForeColor = ForeColor.Green
    End Sub
End Class

输出