試していないから解らんが
>下　Form - SplitContiner - TabControl - Panel - TextBox　上
なら
If Not TypeOf ctrl Is TextBox Then Exit Sub
↑ここで抜けてる気がするなぁ。

Ctrlの定義を
Dim ctrl As Control = Me.SplitContainer3.TabControl.Panel.ActiveControl
にしなきゃダメな悪寒

イベントが発生しないと書いているが、イベント事態は発生してるんじゃない？
イベントハンドラの一番上にmessageboxなりConsole.writeなり書いてイベント事態が起きてるかどうか確認してみた？