Dim X As New WebControls.Image()
X.ImageUrl = "~/Control/ImageFromDS.aspx&i=" & OneTovarPos.TovarValue
Panel3.Controls.Add(X)

Partial Class ImageFromDS
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
....
Dim i As Integer = Request.QueryString("i")     'какой именно рисунок из сессионного отбора надо отрисовать
Dim OneTovarPos As WorkingTovar
For Each OneTovarPos In WorkNodes
     If OneTovarPos.TovarValue = i Then
          Response.ContentType = "image/bmp"
          Response.BinaryWrite(CType(OneTovarPos.PriceDS._MyPrice( 0 ).MyImage(), Byte()))
     End If
....