VB.NET中如何在执行子程序时同步播放动画GIF?