MID$を覚えるというのは重要ですが、短くするのが目的ならばMID$("Version1.0",I,1);の部分は"Version1.0"[I];とすることもできますね。