function chgstr(h,str1,str2)
if get(h,'value')
  set(h,'string',str2);
else
  set(h,'string',str1);
end
