Private Sub Command1_Click() Set Label1(0).Container = Picture1 Set Label1(1).Container = Picture1 End Sub
label1(0).move picture1.left,picture1.top 是这个意思吗?
Private Sub Command1_Click() Set Label1(0).Container = Picture1 Label1(0).Move 0, 0 Set Label1(1).Container = Picture1 Label1(1).Move 0, Label1(0).Height End Sub
Set Label1(0).Container = Picture1
Set Label1(1).Container = Picture1
End Sub
是这个意思吗?
Set Label1(0).Container = Picture1
Label1(0).Move 0, 0
Set Label1(1).Container = Picture1
Label1(1).Move 0, Label1(0).Height
End Sub