vb 图像框拖动问题

来源:百度知道 编辑:UC知道 时间:2024/04/30 13:04:04
有一个button 我拖动图像框以后 按button键 所有图像框都要归位
问题是我有很多图像框,不能每一个都记录吧

用组合控件index
然后初始的时候记录每个属性
for i =1 to 100
a(i,1)=Command1(i).Top
a(i,2)=Command1(i).left
next i

要恢复的时候
for i =1 to 100
Command1(i).Top=a(i,1)
Command1(i).left=a(i,2)
next i

你记录图像框的原始left和top属性值,按button 后把这两个属性值再设置为原始值就可以了