具体代码如下: 
teecher 输出图片流并保存到 session("ch1")里
Me.WebChart1.Chart.Export.Template.Save(tmpchart)
                Session.Add("ch1", tmpchart)
  另一个图片显示也免得代码             
If Me.Session("ch1") IsNot Nothing Then
            Dim chartStream As New IO.MemoryStream            chartStream = CType(Session("ch1"), IO.MemoryStream)
            Response.OutputStream.Write(chartStream.ToArray(), 0, CInt(chartStream.Length))
            chartStream.Close()
            'Session.Remove(chartName)        End If