VBA在userform上更改图像

时间:2014-05-14 13:02:52

标签: excel vba

我正在使用此代码为用户更改用户表单上的图像。

    Private Sub image_logo_Click()
        Dim filetoOpen
        filetoOpen = Application.GetOpenFilename("Image Files (*.jpg;*.gif), *.jpg;*.gif")
        If filetoOpen <> False Then
image_logo.Picture = LoadPicture(filetoOpen)
Form.Repaint
End Sub

它工作正常,但由于某种原因,当我去VBA编辑器时,图像恢复到旧图像。任何想法为什么会这样?

0 个答案:

没有答案