PROPRIEDADE OCX
Eu ja tinha chegado a essa conclusão q num ia dar ....
Gostei do seu codigo webmaster !!!!
eu num tenho tanto conhecimento assim pra fazer codigo profissional ...... olha só isso:
[txt-color=#e80000]Primeira tentativa em meu codigo[/txt-color]
[txt-color=#007100]If leftX > X Then [ô]move para traz
If picLeft.Left > 500 Then
MarginWidth = MarginWidth + (leftX - X)
Else
Exit Sub
End If
ElseIf leftX < X Then [ô]move para frente
If picLeft.Left + 500 < picRight.Left Then
MarginWidth = MarginWidth + (leftX - X)
Else
MarginWidth = 500
Exit Sub
End If
End If[/txt-color]
[txt-color=#e80000]Segunda tentativa, depois de refrescar a cabeça:[/txt-color]
[txt-color=#007100]MarginWidth = picRight.Left - picLeft.Left[/txt-color]
Ta vendo ........ programação tem hora q ta deixando eu ficar doido !!!!!
Gostei do seu codigo webmaster !!!!
eu num tenho tanto conhecimento assim pra fazer codigo profissional ...... olha só isso:
[txt-color=#e80000]Primeira tentativa em meu codigo[/txt-color]
[txt-color=#007100]If leftX > X Then [ô]move para traz
If picLeft.Left > 500 Then
MarginWidth = MarginWidth + (leftX - X)
Else
Exit Sub
End If
ElseIf leftX < X Then [ô]move para frente
If picLeft.Left + 500 < picRight.Left Then
MarginWidth = MarginWidth + (leftX - X)
Else
MarginWidth = 500
Exit Sub
End If
End If[/txt-color]
[txt-color=#e80000]Segunda tentativa, depois de refrescar a cabeça:[/txt-color]
[txt-color=#007100]MarginWidth = picRight.Left - picLeft.Left[/txt-color]
Ta vendo ........ programação tem hora q ta deixando eu ficar doido !!!!!
O resultado da segunda tentativa e igual ao da primeira ........ só que o segundo e mais pratico .... rsrsrsrsr
valeuuuuu genteeeemmm
valeuuuuu genteeeemmm
Tópico encerrado , respostas não são mais permitidas