实现SSTab单个选项卡代码

前言

最近在机房中结账部分的SSTab选项卡，我设置了5个选项卡，一开始想要它每点击一个选项可或换一个选项卡时，就执行该选项可对应的代码，通过选项可的索引来调用它的代码部分，但怎么都实现不了！
这是我一开始的关键代码：

Private Sub SSTab1_DblClick()
　Select Case SSTab1.Tab     '根据SSTab1的tab索引 
 　　Case 0  
 　　　。。。。。。。
　　 Case 1
 　　　。。。。。。
 　　Case 2
 　　　。。。。。。
End Sub

过程

后来在网上查了很多，也自己试了试，有的可以，有的运行不出来，我想不是它的代码有问题，而是我没有用对地方！

比如这个我试了一下，结果选项卡根本没有这个方法！：

Select Case SSTab1.SelectedItem.Index
       Case 1
             ....
       Case 2
            ......
End Select

在比如，试了试这个，也是显示有问题，这个过程根本就不能这样写！

Private Sub SSTab1_Click()
    Select Case SSTab1.Tab
        Case 1
          Text1.Text = "asdfsadf "
    End Select
End Sub

最后终于找到了一个方法，试了试，给成功了！

Private Sub SSTab1_Click(PreviousTab As Integer)
    If SSTab1.Tab = 0 Then
        。。。。。。。
    End If
    If SSTab1.Tab = 1 Then
        。。。。。。。
    End If
End Sub

在控件的Click事件中，这才是这个控件的最基本的用法。
后来，对比了一下自己的代码和之前第二个自己尝试的错代码。
第二个自己尝试的错代码问题：想使用它的单机事件，但这个事件或者过程再或者这个函数是需要参数的！而错误的原因就是没有写参数
自己的错在：事件用错了，还有就是和自己第二个尝试的错代码一样的问题了！

总结

多查！