あとMID$のYはそもそも間違ってると思いますよ…。 Yの位置の引数は、MID$で抜き出す文字数になります。なので単純に１と書けば１文字取り出して表示出来るはずです。