Scusa, dato che mi devo assentare ti posto un esempio per creare da codice il controllo:
codice:
' Crea un controllo CheckBox sulla Frm:
Private Sub Command1_Click()  
Dim BoxNew As CheckBox
  Set BoxNew = Controls.Add("VB.CheckBox", "BoxNew")
  With BoxNew
    .Move 500, 500, 500
    .Visible = True
  End With
End Sub
Ciao.