Question

我收到以下代码的运行时错误91 ...我不知道我正在制作什么错误但它无法正常工作。在此先感谢。

List<Map<String, Object>> lst = new ArrayList<Map<String, Object>();
lst.stream().sorted((map1, map2) -> {
    // compare the values here
    return 0;
}).forEachOrdered(map -> {/* output here */});

Answer 1

在此处从代码中删除.Picture一词：

`Set img = ThisWorkbook.VBProject.VBComponents("UserForm10").Designer.Controls("Image3").Picture`

这是因为.Picture是Image的String属性，不应该设置它。请参阅：Picture Property MSDN

根据您的工作情况，有不同的选择。如果您的代码位于用户表单中，并且您没有关注MVC pattern，那么点击Label7表单后，这样的内容会更改图片：

Private Sub Label7_Click()

    Dim img As Object
    Set img = Me.Controls("Image3")

    Dim picAddress As String
    picAddress = Application.GetOpenFilename
    img.Picture = LoadPicture(picAddress)

End Sub

运行时错误91在VBA用户窗体中加载图片时

1 个答案: