How can I change the style of a commandbutton dynamically created?

My code:

frm.Controls.Add "VB.CommandButton", "cmdTest"
'
'
'
set cmdAdicionar = mdgrDataGrid.Parent.Controls("cmdTest")
cmdAdicionar.Top = lngTop + 50
cmdAdicionar.Left = lngLeft + 50
cmdAdicionar.Width = 200
cmdAdicionar.Height = 100
cmdAdicionar.Style = 1 '----- error -----
cmdAdicionar.Picture = LoadResPicture(101, vbResBitmap)
cmdAdicionar.ZOrder 0
cmdAdicionar.TabStop = true
cmdAdicionar.Visible = true




The style property is read only at run time. :-(