>>3

こんなコードが手元にあるけどー。

Private Sub TabStrip1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
　　If Button = 2 Then
　　　　If TabStrip1.SelectedItem.Left < (x / Screen.TwipsPerPixelX) _
　　　　　　And (x / Screen.TwipsPerPixelX) < TabStrip1.SelectedItem.Left + TabStrip1.SelectedItem.Width _
　　　　　　And TabStrip1.SelectedItem.Top < (y / Screen.TwipsPerPixelY) _
　　　　　　And (y / Screen.TwipsPerPixelY) < TabStrip1.SelectedItem.Top + TabStrip1.SelectedItem.Height Then
　　　　　　popupmenu mnuHoge

どうやら私もいい方法が思いつかなかったらしく、SelectedItemの領域外を
右クリックした時は無視するようにてる模様。
…腐れてるなぁ。