Good advice above, but if that doesn't fit your situation, then the following sub should serve as a template. Its easiest to run from a command button on a form (other than destination form).
Set the positions, number of controls and destination form name. Note that the destination form must be open in design view.
Cheers, Bill
Dim frm As Form
Dim ctlCheck As Control
Dim intX As Integer
Dim intY As Integer
Dim iCtr As Integer
Dim strFormName as string
strFormName = "Form2"
intX = 1000
intY = 100
iCtr = 10
Set frm = Forms(strFormName) ' destination form (must be open in design view)
Do While iCtr > 0
' Set positioning values for new controls.
intY = intY + 200
' Create controls.
Set ctlCheck = CreateControl(frm, acCheckBox, acDetail, , , intX, intY)
iCtr = iCtr - 1
Loop