vb是不是不能调用资源文件中的jpg图片阿,到处搜索,没有找到答案,请高手帮忙。

解决方案 »

  1.   

    可以调用,给你一段调用GIF的代码,改下就行了
    '-------加载GIF动画资源文件
    Dim Gif() As Byte
    Dim Gifpath As String
    Gifpath = App.Path & "\temp.gif"
    Gif = LoadResData(101, "CUSTOM") '读取资源文件,101号是个GIF图片
    Open Gifpath For Binary Access Write As #1
    Put #1, , Gif
    Close #1
    '定义AniGif1动画控件
    AniGif1.BorderStyle = 0
    AniGif1.FileName = Gifpath '加载动画
    '在退出使用后可删除动画文件
     Kill App.Path & "\temp.gif"
      

  2.   

    非常感谢,问题已解决,其实从我的应用来看,用bmp也是可以的,可是想学习一下这个。