[Cseek]

with vb6
use object.control.add method

dim lbl_x as control
set lbl_x = frm_x.controls.add("vb.label","lbl_10")

try something like this