netice

Private Sub Timer1_Timer()
    ctListBar1.ItemPicture(1, 1).Handle
    ctListBar1.ItemPicture(1, 1).Height
    ctListBar1.ItemPicture(1, 1).hPal
    ctListBar1.ItemPicture(1, 1).Render
    ctListBar1.ItemPicture(1, 1).Type
    ctListBar1.ItemPicture(1, 1).Width
   
End Sub


我只是想让图片移动起来。。但是这几个参数我都实验了下。。实在不能让它动下
只能让它消失  ctListBar1.ItemPicture(1, 1)=nothing
但是不能保存让它重新显示！。。而且没有visible属性！
真郁闷。。。。

netice

偶估计是用ctListBar1.ItemPicture(1, 1).Render
来实现。。说下里面的参数
ctListBar1.ItemPicture(1, 1).Render（hde as long,X as long,Y as long,cx as long ,cy as long ,xSre as ole_xpos_HTMETRIC,ySre as ole_ypos_HTMETRIC,cxSre as as ole_xsize_HTMETRIC,cySre as as ole_ysize_HTMETRIC,prenbounds as any)
。。。。麻烦看看。。。

netice

是个第3方控件（类QQ垂直菜单）

netice

偶把那个控件上传了上来

netice

估计让这个上边的控件上的图片动起来太麻烦用时间控件实现了图片交换显示，但是若动态地像QQ头像那样同时可以很多头像闪动就很复杂了。。。
偶决定放弃让它动了。。。郁闷！

netice

哈哈。。我该成其他方法了。。
我让用户名闪动！。。。算是个改进了。。呵呵