选项卡的内容问题。求教

Question

在窗体上增加一个Tabstrip控件。ts是此控件的名称.为什么运行后在选项卡上不显示图片框中的内容，只显示了一个空白的Tabstrip控件
我的代码：
private sub form_load
ts1.Top = 0
ts1.Left = 0
ts1.Height = Form1.ScaleHeight
ts1.Width = Form1.ScaleWidth
ts1.Tabs.Clear
ts1.Tabs.Add 1, , "正常借书"
ts1.Tabs.Add 2, , "续借图书"
ts1.Tabs.Add 3, , "还书"
For i = 1 To 3
Picture2(i).BorderStyle = 0
Picture2(i).Top = ts1.ClientTop
Picture2(i).Left = ts1.ClientLeft
Picture2(i).Height = ts1.ClientHeight
Picture2(i).Width = ts1.ClientWidth
Picture2(i).Visible = False
Next i
Picture2(1).Visible = True
end sub

Answer 1

通过选项卡的click事件，判断选中了显示哪个选项卡，来显示/隐藏Picture,
最好用frame,占用的系统资源较少。