Ae Oque Tem De Errado Nesse Codigo?

[PedroBarreto]

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Text1.Text = X

Text2.Text = Y

End Sub

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Picture1.CurrentX = X

Picture1.CurrentY = Y

End Sub

Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Text3.Text = X

Text4.Text = Y

Picture1.Line = (Text3.Text) - (Text1.Text)

Picture1.Line = (Text5.Text) - (Text2.Text)

End Sub

Eu queria que ele criasce a linha mais não cria, da erro.

alguém pode me ajuda? post ae

[Graymalkin]

Line é um método, não uma propriedade.

Abraços,

Graymalkin

[PedroBarreto]

Manu passa esse codigo para eu antes que eu quebro meu computadorr

[Graymalkin]

Manu passa esse codigo para eu antes que eu quebro meu computadorr

Se você quebrar o computador vai ser pior para você, não para mim. E, eu já te passei um tópico que tem um exemplo de utilização do método Line.

Abraços,

Graymalkin

[ramon]

Manu passa esse codigo para eu antes que eu quebro meu computadorr

hehehe essa é boa!