魔界の仮面弁士様
いつもお世話になります。

>VB には「Dir 関数」が標準で組み込まれているので、別の変数名にした方が良いかと思います。

良い変数名が思い浮かばずつい…＾＾：


>また、lblMovingUp と ｌblMovingUp が混在している点も気になりますし、
>If/ElseIf 句が lblMovingLeftthen / lblMovingRightthen なのに、
>Handles 句が lblMovingLeft / lblMovingRight なのも不自然ですね。

直接手打ちした為の入力ミスです＾＾；
ご容赦ください＾＾；；；


辞書を使って書く方法が一番スマートそうです。

Select Case Trueと言う書き方があると言う事も知る事が出来ました。

最近はオブジェクト指向のプログラムがある程度は書ける様にはなりましたが、
VB.NETが出来てからもしばらくはVB6.0で組んでいたもので、
オブジェクトについてはまだまだ勉強が足りないなと痛感しています＾＾；
このコードを見た時、目から鱗でした…ｗ

ありがとうございました。