Here is one approach......I attempted to use "Remove Axis Label" on the graph builder window, but it failed to work. So I had to get a bit more specific.
![listbox.PNG listbox.PNG](https://community.jmp.com/t5/image/serverpage/image-id/26883iC981C1289738D030/image-size/large?v=v2&px=999)
names default to here(1);
dt=open("$SAMPLE_DATA/big class.jmp");
gb = Graph Builder(
Size( 528, 456 ),
Show Control Panel( 0 ),
Variables( X( :weight ), Y( :height ) ),
Elements( Points( X, Y, Legend( 6 ) ), Line Of Fit( X, Y, Legend( 8 ) ) )
);
gbr = gb << report;
gbr[LegendBox(1)]<<delete;
gbr[GraphBuilderComponentBox(1)][TextEditBox(1)]<<set text("");
gbr[GraphBuilderTitleBox(3)][TextEditBox(1)]<<set text("");
gbr[GraphBuilderTitleBox(4)][TextEditBox(1)]<<set text("");
nwj=new window("The Picture",<<journal);
nwj<<append(gbr[ListBox(2)]<<get picture);
Jim