 |
TabStrip不如SSTab(Microsoft Tabbed Dialog Control)好使,主要就体现在设计时,SSTab可以比较方便地切换选项卡,而TabStrip控件不能在设计时进行切换。
你可以建立一个PictureBox数组picOptions(),让TabStrip的每个选项对应picOptions()控件数组中的一个,把每个页面上的控件都放在相应的PictureBox中。第一个选项为picOptions(0),第二个为picOptions(1),依次类推。如果你想修改某个选项,就在属性窗口中选择相应的picOptions,然后修改该控件的Left属性,这样你就可以看到picOptions了。在VB中选择“添加窗体”,然后选择“选项对话框”所建立的窗体就是根据这个原理做的。
你可以看看TabStrip的Click事件:
Private Sub tbsOptions_Click()
Dim i As Integer
'显示并使选项的控件可用
'并且隐藏使其他被禁用
For i = 0 To tbsOptions.Tabs.Count - 1
If i = tbsOptions.SelectedItem.Index - 1 Then
picOptions(i).Left = 210
picOptions(i).Enabled = True
Else
picOptions(i).Left = -20000
picOptions(i).Enabled = False
End If
Next
End Sub
此问题由李海回答。
附加关键字:编程, 源程序, programming, source code, Visual Basic, VB, Windows 9x控件, listview, treeview, monthview, progress bar。
|