satriano17
Gebruiker
- Lid geworden
- 30 sep 2012
- Berichten
- 331
Ik zeg meteen dat ik nooit met lines gewerkt heb . Ik heb wat op het net gezocht , maar niet veel gevonden.
Mijn doel is om een simpel lijn te trekken tussen twee shapes zoals in het beeld.
Ik heb dus twee shapes op het form.
Private Sub Command1_Click()
Shape1.Left = 1440
Shape1.Top = 480
Shape2.Left = 5760
Shape2.Top = 1680
Line1.X1 = (Shape1.Left + Shape1.Top)
Line1.Y1 = (Shape2.Left + Shape2.Top)
End Sub
De lijn wordt niet getrokken tussen de twee shapes maar wel op andere plaats. Wat is de juist formule?
dank u
Mijn doel is om een simpel lijn te trekken tussen twee shapes zoals in het beeld.
Ik heb dus twee shapes op het form.
Private Sub Command1_Click()
Shape1.Left = 1440
Shape1.Top = 480
Shape2.Left = 5760
Shape2.Top = 1680
Line1.X1 = (Shape1.Left + Shape1.Top)
Line1.Y1 = (Shape2.Left + Shape2.Top)
End Sub
De lijn wordt niet getrokken tussen de twee shapes maar wel op andere plaats. Wat is de juist formule?
dank u
Bijlagen
Laatst bewerkt: