Como alterar somente cor do texto da aba corrente ?

Kra pelas propriedades do sstab, não tem como, tu pode procurar alguma ocx, diferente mas vai dar um pouco de trabalho, prq tu não utiliza um frame por traz de todos componentes, mas a aba vai ficar com a cor original!

 

 

Vi uma solução facil uma vez crie controles label indexados com mesmo índice das abas com caption igual as abas referentes sobrepostas ao caption da sstab dai faça:

para uma sstab com 3 abas:

Dim mCaption(2) As String

Private Sub Form_Load()
SSTab1.Tab = 0
mCaption(0) = SSTab1.TabCaption(0)
mCaption(1) = SSTab1.TabCaption(1)
mCaption(2) = SSTab1.TabCaption(2)
End Sub

Private Sub SSTab1_Click(PreviousTab As Integer)
Dim i As Integer

lbltab(PreviousTab).Visible = False
SSTab1.TabCaption(PreviousTab) = mCaption(PreviousTab)
SSTab1.TabCaption(SSTab1.Tab) = ""
lbltab(SSTab1.Tab).Visible = True
End Sub