VB 实现VC TAbControl控件
2017-06-12 15:10
169 查看
VB实现VC TabControl控件
新建一个工程文件Project1,
在左侧工具栏中点右键
在出现的选项中点“Components”,在打开窗口中找到“Controls”选项也中的“Microsoft Tabbed Dialog Control 6.0”,然后点“应用”“确定”退出该页面
此时,在工具栏的右下角会出现刚添加的组件SSTab
拖动改控件到Form1中,
该控件索引是从0开始算的
在属性窗口的Tabs 中可以设置控件中选项页的页数,TabsPerRow 可以设置每一行的选项页数
判断选择了那一页可以添加如下代码,用于在单击控件实现页面切换的时候获取选择的当前页
Private Sub SSTab1_Click(PreviousTab As Integer)
Select Case Me.SSTab1.Tab
Case 0
MsgBox "选择了第一页"
Case 1
MsgBox "选择了第二页"
Case 2
MsgBox "选择了第三页"
End Select
End Sub
这样就能实现和VC TabControl空加你一样的效果了,添加别的按钮可以直接拖动到控件上添加相应的代码实现相应的功能。
运行效果如下图:
新建一个工程文件Project1,
在左侧工具栏中点右键
在出现的选项中点“Components”,在打开窗口中找到“Controls”选项也中的“Microsoft Tabbed Dialog Control 6.0”,然后点“应用”“确定”退出该页面
此时,在工具栏的右下角会出现刚添加的组件SSTab
拖动改控件到Form1中,
该控件索引是从0开始算的
在属性窗口的Tabs 中可以设置控件中选项页的页数,TabsPerRow 可以设置每一行的选项页数
判断选择了那一页可以添加如下代码,用于在单击控件实现页面切换的时候获取选择的当前页
Private Sub SSTab1_Click(PreviousTab As Integer)
Select Case Me.SSTab1.Tab
Case 0
MsgBox "选择了第一页"
Case 1
MsgBox "选择了第二页"
Case 2
MsgBox "选择了第三页"
End Select
End Sub
这样就能实现和VC TabControl空加你一样的效果了,添加别的按钮可以直接拖动到控件上添加相应的代码实现相应的功能。
运行效果如下图:
相关文章推荐
- VB 实现VC TAbControl控件
- VC++ Tab Control控件的使用
- VC++ Tab Control控件的详细使用
- tab control控件 vc++ 6.0 移植到VS2008 出现的问题(初学VC++的可以看看,)
- VC 使用Tab Control 控件的例子
- VC++ Tab Control控件的使用
- VC++ Tab Control控件的详细使用
- C#仿QQ皮肤-TabControl控件实现
- [转]VC++ Tab Control控件的使用
- VC++ Tab Control控件的使用
- VC++ Tab Control控件的基本用法
- VC++ Tab Control控件的详细使用(图)
- VC++ Tab Control控件的使用
- VC中使用TAB Control控件
- VC中TabControl控件使用方法(转载)
- VC++ Tab Control控件的详细使用
- 给所有的Control添加发送键盘事件Tab事件,实现回车键自动跳转到下一个控件
- VC中使用TAB Control控件
- 利用Menu和MutiView控件实现类似tabControl效果
- VB.Net2005中TabControl实现Disabl功能,例一