レスありがとうございます。
＞ifの条件文が長い場合はあらかじめ比較するモノを変数に入れておくとか。
んと、とりあえずこんな感じにしてみたんです。
select case Npc.x(敵のｘ座標）
case is > Player.x(自分のｘ座標）
　　if Npc.Y < player.Y then
Npc.X = Npc.X - 32（32はひとますぶんです）
Npc.Y = Npc.Y + 32
endif
...こんなかんじで、敵のいる位置のパターンが8こ（斜め４個に上下左右）
もあるんで、どんどん入れ子じょうたいになってしまって。。。

＞移動する処理自体を1つの関数にしておいて後から高速化するのが望ましいかも。
ふむふむ。上記の移動の処理をMoveNpc というPublic Subにしているんですが、
そのなかに自作の関数をいれるということでしょうか？

＞敵のｘ座標が自分のｘ座標より小さい場合や
ｙ座標が自分のｙ座標より大きい場合は考えなくていいのか

そうなんです！パターンのぶんだけif −ｅｎｄｉｆ　文がふえてしまって
ながくなっちゃってるんですよね。これをもっとどうにかして
みじかくならないかなあと。。。

＞俺ならとりあえず移動処理をブラックボックスにしてほっとく
ふむふむ、さきにほかのところを完成させちゃえー、ということですね。
たしかに、、、ほかにも考えなきゃいけないとこがいっぱいあるんで
そっちもがんばりたいとおもいます。