愁啊！滚动条弄不明白了

Question

在frame里面滚动frame？ 恐怕不行吧~
小的frame里面 放的什么？

Answer 1

小的frame里面放的是查询条件，我想实现的是可以有多个查询条件的frame，每个frame里面用做一个条件,里面的控件有combox

Answer 2

窗体上应放两个picturebox control:P1,P2。P1是P2的容器。
在P2里放三个小frame，加载更多的frame时，在P2上加载,再在旁边放一滚动条，
让P2在P1中滚动只显示三个frame.
代码较麻烦。
祝你好运！！！！！

Answer 3

控件 4个Frame,一个是容器大Frame,三个是小Frame 名称Name是Frame Index 为0，1，2是控件数组
还有一个垂直滚动条VScroll1Option ExplicitDim FraCount As LongPrivate Sub Form_Load()
    
    Dim ii As Long
    FraCount = 20
    
    For ii = 3 To FraCount
        
        Load Frame(ii)
        Frame(ii).Caption = "Frame" + CStr(ii + 1)
        
    Next ii
        
     With VScroll1
        .Min = 0
        .Max = FraCount - 3
    End With
     
End SubPrivate Sub VScroll1_Change()
    
    Dim ii As Long
    
    For ii = 0 To FraCount
        Frame(ii).Visible = False
    Next ii
    
    For ii = VScroll1.Value To VScroll1.Value + 2
        With Frame(ii)
            .Top = 240 + (ii - VScroll1.Value) * 1500
            .Visible = True
        End With
    Next ii
    
    
End Sub