LoadPicture错误无效图片

Iba*_*ola 3 powerpoint vba loadimage

我正在尝试从文件夹中获取图像以检查其宽度。为此,我使用以下代码:

         Dim pic As IPictureDisp
         Dim var As Variant
         var = "C:\Myfolder\Animage" & animationNum + 1 & ".png"
         pic = LoadPicture(var)
Run Code Online (Sandbox Code Playgroud)

它给我“无效图片”错误。我也尝试只使用以下行:

        width = LoadPicture("C:\Myfolder\Animage" & animationNum + 1 & ".png").width
Run Code Online (Sandbox Code Playgroud)

但它也给了我同样的错误。我怎样才能加载图片?

编辑

我尝试使用 jpg 图像,它可以工作...此功能对 png 文件是否存在一些问题?

Aar*_*mas 6

来自msdn.microsoft.com

Visual Basic 识别的图形格式包括位图 (.bmp) 文件、图标 (.ico) 文件、光标 (.cur) 文件、游程编码 (.rle) 文件、图元文件 (.wmf) 文件、增强型图元文件 (.emf) )、GIF (.gif) 文件和 JPEG (.jpg) 文件。

不支持.png 。