Vba创建一个带图片和label的窗体

要在 VBA 中创建一个带图片和 Label 的窗体，可以使用 VBA 的用户界面工具包（UserForm）。UserForm 是 VBA 中的一个对象，可以用来创建自定义的窗体，可以添加各种控件，如图片、标签、文本框、按钮等等。

以下是一个示例代码，可以创建一个带图片和 Label 的窗体：

1. 首先，在 VBA 窗口中右键单击项目，选择插入 -> 用户界面 -> 用户窗体，创建一个新的 UserForm。

2. 在 UserForm 上添加一个图片控件和一个标签控件，分别命名为 Image1 和 Label1。

3. 在 UserForm 的代码窗口中添加以下代码：

Private Sub UserForm_Initialize()
    ' 设置窗体标题
    Me.Caption = "My Form"
    
    ' 设置图片控件的图片
    Me.Image1.Picture = LoadPicture("C:\Users\Username\Desktop\image.jpg")
    
    ' 设置标签控件的文本
    Me.Label1.Caption = "Hello, World!"
End Sub

在 UserForm 的 Initialize 事件中，设置了窗体的标题、图片控件的图片和标签控件的文本。需要注意的是，这里的图片路径需要根据实际情况进行修改。

4. 在 VBA 窗口中添加一个模块，并添加以下代码：

Sub ShowMyForm()
    Dim myForm As New UserForm1 ' UserForm1 是创建的 UserForm 的名称
    myForm.Show
End Sub

这段代码创建了一个 UserForm1 的实例并显示出来。

5. 最后，在 VBA 窗口中运行 ShowMyForm 子过程，即可显示出新创建的带图片和 Label 的窗体。

需要注意的是，创建的 UserForm 可以通过添加其他控件和修改事件来实现更多的功能，例如添加按钮、文本框等等。