不会了！！

毛病找到  但还有一个问题 Dim da1 As SqlDataAdapter
        Dim ds1 As New DataSet()
        da1 = New SqlDataAdapter("select * from pic where id='" & id & "'", conn)
        da1.Fill(ds1, "table11")
        If ds1.Tables("table11").Rows.Count = 0 Then
            Image1.Visible = False
        Else            Dim i As Integer            For i = 0 To ds1.Tables("table11").Rows.Count - 1                Dim dr1 As DataRow = ds1.Tables("table11").Rows(i)
                Dim picurl As String = dr1("url")
                Image1.ImageUrl = "admin/pic/" & picurl
                Response.Write(picurl)            Next
        End If我怎么让图片循环呀！！！