>  2007/10/20 (土) 12:37:47        [qwerty]
> > ページを遷移するとドカンとメモリを食う(;´Д`)
> > そのページは不特定でだいたい1200くらい遷移するとサーバが落ちる
> > で実装担当社は逃亡
> ちょとコード張ってみてよ(;´Д‘)

Private Sub PageSeni(Byval KaisiPage As Integer,Byval OwariPage As Integer)
{
    Dim i As Integer

    For i = KaisiPage To OwariPage - 1 Then
        Me.Panel1.Add(GeneratePage(i))
        Me.Panel1.Control(i).Visible = False
        If i = OwariPage -1 Then
            Me.Panel1.Control(i).Visible = True
        Then
    End If
}

参考:2007/10/20(土)12時31分17秒