Dim imgx As ListImage
  Set imgx = ImageList1.ListImages.Add(, , LoadPicture("c:\1.ico"))
    Set imgx = ImageList1.ListImages.Add(, , LoadPicture("c:\2.ico"))
      
 TreeView1.ImageList = ImageList1可是我想把ICO放到VB做的软件的目录里,并且不想用绝对路径。。
要怎么弄?

解决方案 »

  1.   

    Set imgx = ImageList1.ListImages.Add(, , LoadPicture(app.Path & "\1.ico"))
    或者把图片放到ImageList控件里。
      

  2.   

    Set imgx = ImageList1.ListImages.Add(, , LoadPicture(app.Path & "\1.ico"))这个我试了,管用呀:]
    可是要怎么才能把图片放到ImageList控件里呀???
      

  3.   

    把图片放到ImageList控件里,就是直接设置属性。
      

  4.   

    添加ImageList控件到窗体,设置自定义,--->图像---->插入图片