copy controls

[kriske]

Hello,

I want to write a little function for copy controls on a form.
I wrote this code but it doesn't work :
___________________________________
Private Sub Form_Load()

Object_Kopiëren shpBorder(0), 2, 100, 100

End Sub
-----------------------------------------------------------
Private Sub Object_Kopiëren(ByRef CopyControl As VB.control, ByVal Aantal As Integer, ByVal xMove As Integer, ByVal yMove As Integer)

Dim i As Integer

For i = 1 To Aantal
Load CopyControl(i)
CopyControl(i).Visible = True
'code to move the object on the right place...
Next i

End Sub
_____________________________________

What did I wrong ?

Kris

[Janus]

I don't know german, what's the english name of that event?

[/\/\isanThr0p]

Its just a sub he defined
translated that would be object_copied...

[CornedBee]

No, it translates to
copy_object

That's the reason why I never use german in my code. Other people get confused and you sometimes need to use stupid ae, oe or ue for ä, ö and ü. Not to mention ss or sz for ß

[/\/\isanThr0p]

true true, well I do know german you know

I hardly ever use german in my code... only for a few identifiers if I do something exclusivly in german.

[CornedBee]

As do I...

Unless someone thinks I live in Australia