function band_modis1b_callback

handles = guidata(gcf);
s = get(gcbo,'Label');
[t, r] = strtok(s, ' ()');
s = r;
[t, r] = strtok(s, ' ()');
band = str2num(t);
s = r;
[t, r] = strtok(s, ' ()');
wn = str2num(t);

var = 'MODIS Level1b';
handles.modis.select_name = var;
handles.modis.band = band;
handles.modis.wavenumber(band) = wn;
handles  = load_modis1b(handles);
% Get selected MODIS elements (radiance measurement)
handles = select_modis(handles);
handles = plotModisImage(handles);

% Update handles structure
guidata(gcbo, handles);
