Sorry, incomplete information

try putting on the first line of command:

Public jbtoolbar1

jbtoolbar1 =createobject( "ToolBar" )
jbtoolbar1.Caption ="Joao Batista - Primeira Toolbar"
jbtoolbar1.addobject ( "Button1" , "Commandbutton" )
jbtoolbar1.addobject ( "Sep1" , "Separator" )
jbtoolbar1.addobject ( "Button2" , "Commandbutton" )
jbtoolbar1.addobject ( "Sep2" , "Separator" )

jbtoolbar1.button1.caption="\"
jbtoolbar1.button1.Visible = .T.
jbtoolbar1.button1.autosize=.t.
jbtoolbar1.button2.caption="\"
jbtoolbar1.button2.autosize=.t.
jbtoolbar1.button1.Visible = .T.

jbtoolbar1.width =200
jbtoolbar1.Show

Note:
This is the code i have made to work with the test, change to your own.

Nuno Brito