sstab Issue

[firoz.raj]

I simple want when user type 1 then it needs to create one tab. but when he type 2 then it needs to create 2 tab.in a way so that . if even he will type
10 it needs to create 10 tab .So let me know .how should i achieve it ? .here are the code.where i am confessing .

Public Sub CreateTab()
Dim row As Integer
row = 4 'here i don't want to use fixed variable
If Not Text1.Text = "" Then
   If Text1.Text > 1 And row > 0 Then   SSTab1.Tabs = row
   SSTab1.TabsPerRow = 4
 'For i = 1 To Row Step 1
 'next
   
End If
End If
End Sub

Private Sub Text1_Change()
CreateTab
End Sub