何かを間違えている。だか、どこをがダメなのかよくわからない。

Kは数値なので、9～13行目は""で括ってはいけません。 「Type Mismatch」が出ていると思います。 何かしらエラーが出てはまってしまった場合は、出ているエラー内容も一緒に投稿すると良いですよ。 より的確な回答を得られます。

数値の部分が文字になってんね。 "1"→1 に直さないと。 ""で囲まれたものは何であれ 文字と判定されるからね。

変数Kは実数型変数(#,省略可)であり文字列変数($)はではないので"を消しましょう。

Kには数値が入ってるはずだから、IF文のところK==0とかにしなきゃならないかな。 "でくくると文字列です。

なるほど！出来ました。ありがとうございます。