Dim suofang As New suofang()
        suofang.suofang(image_i(N))
        suofang.Show()
        N = N + 1
        image_i(N) = bmp.bmp_i
        PictureBox1.Image = bmp.bmp_i
        ToolStripStatusLabel1.Text = "处理完成"



如题