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

接下来，我来分享一下，怎么用这个控件。@H_403_1@

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

基本代码：@H_403_1@

在控件的Click事件中@H_403_1@

Private Sub SST_Click(PrevIoUsTab As Integer)
If SST.Tab = 0 Then@H_403_1@

‘要执行的功能@H_403_1@

end if@H_403_1@

if SST.Tan=1 then@H_403_1@

'要执行的功能@H_403_1@

end if@H_403_1@

...............@H_403_1@

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