This fragment of code i am creating a lable, but when I attempt to change the
font size in the WITH BLOCK. Could someone point out what I am doing wrong.

Set control = OLEObjects.Add(ClassType:="Forms.Label.1", Link:=False, _
DisplayAsIcon:=False, Left:=cw * 3, Top:=rh * 2, Width:=cw * 6,
Height:= _
rh)



With control


End With

control.Object.Font.Size = 20

--
Tim Zych
SF, CA

"TONY" <(E-Mail Removed)> wrote in message
news:A97F1308-8D60-4C00-ACE6-(E-Mail Removed)...
> This fragment of code i am creating a lable, but when I attempt to change
> the
> font size in the WITH BLOCK. Could someone point out what I am doing
> wrong.
>
> Set control = OLEObjects.Add(ClassType:="Forms.Label.1", Link:=False, _
> DisplayAsIcon:=False, Left:=cw * 3, Top:=rh * 2, Width:=cw * 6,
> Height:= _
> rh)
>
>
>
> With control
>
>
> End With