以下のように、似たようなコード行がたくさん含まれているプログラムを書いています。
If Bird.Left + Bird.Width - Wall1.Left < 2 And Bird.Left + Bird.Width - Wall1.Left > -2 And Bird.Top > Wall1.Top Then
と
If Bird.Left + Bird.Width - Wall2.Left < 2 And Bird.Left + Bird.Width - Wall2.Left > -2 And Bird.Top > Wall2.Top Then
そして、このような他のいくつかの行、関数を使用せずに、たとえばf(x、y)のようにこれらの同様の行を宣言する方法はありますか?(このための関数を作成すると、プログラムの速度が大幅に低下するため)