丁寧な解説ありがとうございますm(__)m

>Sub lblMoving_MouseEnter(sender As Label, e As EventArgs)

こう言う書き方も出来るのですね！


>恐らくは Direction As Map.Dir なのですよね。

はい、そうです。


>Tag プロパティを実装しているのは Label ではなく、その親クラスである Control なので、
>今回はあえて Control 型にキャストしてありますが、Label にキャストしても問題ありません。
>（Label クラスは Control の Tag プロパティをそのまま受け継いでいます）

どこからの派生クラスかと言うのも知っていた方が良いみたいですね＾＾；；；；


>> （Label）コントロールのタグをMap.Dirにキャストする？？？
------------------------------------------------------------------------------
Dim lbl As Label = TryCast(sender, Label)
If lbl IsNot Nothing Then
   Dim direction As Map.Dir = CType(lbl.Tag, Map.Dir)
   m.Map.Map_Move(Direction:=direction)
End If
------------------------------------------------------------------------------
Control←Labelの説明と、上記のソースコードで何となく理解できました。