.clone というものを、やってみました
その５
 　　画像.SelectActiveFrame(fd, 0)
　　picturebox1.image=画像.clone
 　　画像.SelectActiveFrame(fd, 1)
　　picturebox2.image=画像.clone
 　　画像.SelectActiveFrame(fd, 2)
　　picturebox2.image=画像.clone

この方法で、こちらの希望する結果になりました
pictureboxに対してうまくいってるので
image型変数に対してもうまくいくだろうと思います

ありがとうございました