C# と VB.NET の質問掲示板

VB.NETの質問です。よろしくお願いします。
VB2013使用

ボタンクリックの際にコンソールをまとめて（各ボタンのタグに　1 2 3を入力）

Private Sub Button_Click(sender As Object, e As EventArgs) Handles Button1.Click, Button2.Click, Button3.Click
       
 Select Case CType(sender.tag, Integer)

            Case 1
            Case 2

としたいのですが、
CTypeで　遅延バインディングエラーがでます。

よろしくお願いします。