请教一下图片设置透明色，excel vba 代码如下，要怎么转成易语言，试了很多方式都不对
ActiveSheet.Shapes("Picture 1").Select  
Selection.ShapeRange.PictureFormat.TransparentBackground = msoTrue  
  Selection.ShapeRange.PictureFormat.TransparencyColor = RGB(255, 255, 255)  
  Selection.ShapeRange.Fill.Visible = msoFalse
这个我要怎么写：
.版本 2      
     Excel对象.读对象型属性 (“ActiveSheet”, ).读对象型属性 (“Shapes”, ).对象型方法 (“AddPicture”, “d:\1.BMP”, 0, 1, 250, 临时整数容器4, 100, 100)  
      Excel对象.读对象型属性 (“ActiveSheet”, ).读对象型属性 (“Shapes”, ).读对象型属性 (“Picture”, 1).读对象型属性 (“ShapeRange”, ).读对象型属性 (“PictureFormat”, ).写属性 (“TransparentBackground”, 真)  
         Excel对象.读对象型属性 (“ActiveSheet”, ).读对象型属性 (“Shapes”, ).读对象型属性 (“Picture”, 1).读对象型属性 (“ShapeRange”, ).读对象型属性 (“PictureFormat”, ).写属性 (“TransparencyColor”, 16777215)
           Excel对象.读对象型属性 (“ActiveSheet”, ).读对象型属性 (“Shapes”, ).读对象型属性 (“Picture”, 1). 读对象型属性 (“ShapeRange”, ).读对象型属性 (“Fill”, ).写属性 (“Visible”, 假)

谢谢分享

good luck

图片怎么可能可以在易语言里设置透明呢？你用ps弄一张透明的图片不是更好？