こんにちは。 
 
問題の早期解決の為にも、VBのバージョンの明記を 
お願いします。 
 
とりあえず以下のように解釈しましたが、 
よろしいでしょうか？ 
 
タブページ1～3にTextboxが1つずつ配置されている。 
 
Buttonを押したときに表示されているページの 
TextboxのTextが数字か判断する。 
 
表示されているタブページが1でなくなったときに 
Textbox1のTextが数字か判断する。 
 
表示されているタブページはTabControl.SelectedIndexで 
知ることができます。 
また、数字かどうかはIsNumericで判断できます。 
 
以下がコードです。(VB2008)で検証、動作確認。 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        Select Case TabControl1.SelectedIndex 
            Case 0 
                Judge(TextBox1.Text) 
            Case 1 
                Judge(TextBox2.Text) 
            Case 2 
                Judge(TextBox3.Text) 
        End Select 
 
    End Sub 
 
    Private Sub TabPage1_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabPage1.Leave 
        Judge(TextBox1.Text) 
    End Sub 
 
    Private Sub Judge(ByVal Expression As String) 
        If IsNumeric(Expression) Then 
            '数字だったときの処理を書く 
            MsgBox("数字です") 
        Else 
            '数字ではないときの処理を書く 
            MsgBox("数字ではありません") 
        End If 
    End Sub 
 
意図した動作でなかったらすみません。