前言

最近在機房中結賬部分的SSTab選項卡，我設置了5個選項卡，一開始想要它每點擊一個選項可或換一個選項卡時，就執行該選項可對應的代碼，通過選項可的索引來調用它的代碼部分，但怎么都實現不了！
這是我一開始的關鍵代碼：

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

過程

后來在網上查了很多，也自己試了試，有的可以，有的運行不出來，我想不是它的代碼有問題，而是我沒有用對地方！

比如這個我試了一下，結果選項卡根本沒有這個方法！：

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

在比如，試了試這個，也是顯示有問題，這個過程根本就不能這樣寫！

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

最后終于找到了一個方法，試了試，給成功了！

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

在控件的Click事件中，這才是這個控件的最基本的用法。
后來，對比了一下自己的代碼和之前第二個自己嘗試的錯代碼。
第二個自己嘗試的錯代碼問題：想使用它的單機事件，但這個事件或者過程再或者這個函數是需要參數的！而錯誤的原因就是沒有寫參數
自己的錯在：事件用錯了，還有就是和自己第二個嘗試的錯代碼一樣的問題了！

總結

多查！

總結

以上是生活随笔為你收集整理的实现SSTab单个选项卡代码的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。