VB机房收费系统选项卡控件(SSTab)介绍

   这段时间做机房收费系统,在结账时用到了SSTab控件.我的VB里面没有这个控件.这需要在网上下载并注册后添加在部件里.当然,也可以从同学那里去copy一个.你拿到控件以后,把它放到一个文件夹里.然后用dos命令    regsvr32 地址\grdes50.dll  来注册。例如:regsvr32 E:机房收费系统\grdes50.dll    然后,在vb里面点浏览,然后选择这个控件。

VB机房收费系统选项卡控件(SSTab)介绍

接下来,我来分享一下,怎么用这个控件。

右击打开属性页。Tab Count 和下面的TabPerRow我都设置为有几个选项。Current Tab 0 为第一个选项。TabCaption为选项标题。

VB机房收费系统选项卡控件(SSTab)介绍

基本代码:

在控件的Click事件中

Private Sub SST_Click(PreviousTab As Integer)
If SST.Tab = 0 Then

‘要执行的功能

end if

if SST.Tan=1 then

'要执行的功能

end if

...............

这就是这个控件的最基本的用法。