public class form1 dim i as integer private sub button1_click(byval sender as system.object,byval e as system.eventargs)handles button1.click i=i-1 if(i)then i=4 end if 'pic.image=imgl.images(i) pic.image=image.fromfile(imgnames(i).fullname) end sub private sub button2_click... 20210311