Adding multipages,pages'labels, checkboxes to Userform

[Stephen English]

I have successfully added a multipage to a form and then added a page to it but when I try to add a label, it puts it on the main form not the multipage and it won't add a checkbox at al
I hope you can give me some clue
Regard
Stephen Englis

Dim mp As MultiPag
Dim pg As pag
Dim lblClause As Labe
Dim cbone As CheckBo

Set mp = Me.Controls.Add("Forms.MultiPage.1", "mpage", True
With m
.Height = 15
.Top = 23
.Width = 51
.Left = 1

Set pg = .Pages.Add("lblclause999"
With p
Set lblClause = Me.Controls.Add("Forms.Label.1", "lblClause"
With lblClaus
.Top = 30
.Width = 5
.Caption = "working
End With
End Wit
End Wit

 

[Peter Hewett]

Hi Stephen English

Change the following statement:
Set lblClause = Me.Controls.Add("Forms.Label.1", "lblClause")

to:
Set lblClause = pg.Controls.Add("Forms.Label.1", "lblClause")

HTH + Cheers - Peter