> プログラム的には
> DirectCast(Sender,Label).BackColor
> …とした方がスマートなのかも知れませんが…

あるいは
Sub lblMoving_MouseEnter(sender As Object, e As EventArgs)
を
Sub lblMoving_MouseEnter(sender As Label, e As EventArgs)
に変更するという手もあります。

※ Option Strict Off の場合のみ有効