Start with this:
folder = pwd; % Wherever.
filePattern = fullfile(folder, '*.png')
imds = imageDatastore(filePattern)
numFiles = length(imds.Files)
for k = 1 : numFiles
subplot(2, 1, 1);
fullFileName = imds.Files{k};
[folder, baseFileNameNoExt, ext] = fileparts(fullFileName);
rgbImage = imread(imds.Files{k});
imshow(rgbImage);
caption = sprintf('File #%d of %d : %s', k, numFiles, [baseFileNameNoExt, ext]);
title(caption, 'Interpreter', 'none');
subplot(2, 1, 2);
imhist(rgbImage);
drawnow;
promptMessage = sprintf('Do you want to Continue processing,\nor Quit processing?');
titleBarCaption = 'Continue?';
buttonText = questdlg(promptMessage, titleBarCaption, 'Continue', 'Quit', 'Continue');
if contains(buttonText, 'Quit', 'IgnoreCase', true)
return; % or break or continue.
end
end
