私はこれまで，プログラムを書くということを意識的に避けながら授業をしてきていた。それは，教科「情報」の指針が，当初，フローチャートを使ってアルゴリズムを教え，プログラムには触れていなかったことにある。しかし，それは例えれば，ロボットの設計図だけ書いて，実際に動くロボットをつくらない授業をしていたことと同じだった。
　「コードを書く」ということの教育的意味を，偶然，私は生徒たちから教えられた。ある時，EXCELのグラフを動かす簡単な「コードを書く」という授業を試しにやることにした。「難しい」という反応なら，それっきりにするつもりだった。ところが，彼らはそのボタン一つでグラフが動き出す授業を拍手と興奮で迎えてくれたのだ。
　そうだった…。その時私は，学生の頃初めてFORTRANのコードを書いて，Hello!とコンピュータにあいさつされたときのなんとも言えない気持ちを思い出していた。コンピュータが知的な生命体のように感じたあの気持だ。

　生徒たちは，コンピュータが開発され，1枚のチップにその心臓部分（CPU）が収められるようになったばかりの頃を知らない。計算機センターに収まっていた巨大なコンピュータが自分のものになるという驚き，それは，多くの理系人間にとって衝撃的な出来事だった。当時，そのチップで作られたマシンはマイコンと呼ばれ，特に1977年アップル社の出したApple II は，みんなの憧れの的だった。ソフトは，BASICというプログラミング言語だけで，付録に簡単なゲームがついていた。コンピュータは計算機であると思っていた理系人間にとって，「ゲームができる」ことにその時気づいた人は多い。そこに新しい地平が見えていたのだ。その付録のゲームこそ「Little Brick Out」つまりブロック崩しゲームである。
　この授業実践は，Excelを使って，ブロック崩しゲームをつくる実践である。
　授業は，まずボールを動かす，そしてボールを壁で反射させる，という一つ一つの動きを理解しながらプログラミングしていく。そして，この授業の最終的な目標を，このブロック崩しゲームを参考に「自分のオリジナルゲームを開発する」ということにおいている。
　生徒たちは，当然，プログラミングに必要な考え方を学ぶことになるが，それ以上に，コードを書いて簡単なゲームをつくったという経験が，彼らにコンピュータという道具を改めて考え直すきっかけになると思っている。
　以下，プログラムの要点を述べ，最後にプログラムを添付した。解説はExcel2007を使っているが，他のバージョンと大きく変わるところはない。

(1) 表の座標を数字にする。

　ここでは，まずプログラムコードが書きやすいようにExcelのほうの準備をしておく。
　OfficeボタンからExcelのオプション→数式を選び，　R1C1参照形式を使用する　をチェックしておく。Excel2003以前のバージョンだとワークシートのツールメニューから　オプション→全般→R1C1参照形式にする　をチェックする。
　R1C1形式に対して通常の形式をA1形式という。R1C1形式にするとExcelの横の欄がアルファベットから数字になり，セルの場所を(x,y)座標として表すことができ，より生徒が受ける数学の感覚に近くなる。

(2) セキュリティチェックを外す設定

　開発というメニューから「マクロのセキュリティ」を開き，すべてのマクロが有効になるようにチェックを入れておく。また，開発者向けのマクロ設定にもチェックを入れておく。

(3) 作業画面を出す

　開発というメニューからVisual Basic Editorを開き，画面にエディターのウインドウが出てくるようにしておく。このエディターにプログラムコードを書いていく。出てこない時は，挿入→標準モジュール　を選ぶ。プロジェクトの該当するシートをダブルクリックしてもよい。実際の作業では，このVisual Basic のウインドウとExcelのウインドウを同時に表示するように，生徒たちには指導している。

　また，縦と横の座標軸は，最小値0，最大値10で固定しておく。これは大事な部分で，実際にボールが動き出した時，座標を固定していないと困ったことになる。
　あとは，ラケットは右矢印→キーを押すと右に，左矢印←キーを押すと左に行くようにすればよい。また，ボールがラケットや，ブロック，壁にあたったとき反射するようにすればいいわけだ。さらには，ブロックにボールが当たったらブロックがなくなってしまうようにする必要がある。
　これらをプログラミングしていくわけである。
　実際の授業では，まずボールだけを描かして，ボールがまっすぐ進むプログラムを自分で作ってみる。次のステップでは，グラフの壁で反射するようにプログラムを書くというように，1時間1時間ゆっくり進んでいく。

　(1)壁はないか，もしあったら反射して向きを変える。
　(2)ブロックはないか。もしあったら反射して向きを変え，かつブロックを崩す（消す）
　(3)ラケットはないか。もしあったら反射する。

　つまり， 秒間の１ステップの移動ごとにすべてを判断させるという，まあ，ボールにとっては厄介なことをさせていることになる。ブロックにいたっては18個もあり，その1個ずつの反射と消去を判断する必要がある。
　また，メインプログラムには，DoEventsというコードが途中書かれてあって，何か他の指示が来た場合，それに従わなければならない。
　それらのプログラムはプライベートサブプログラムとして，このBallプログラムの下に書かれてある。各々は，線で区分けしてあるので，わかりやすいだろう。
　授業では，これらのコードをいっぺんに書かせることはせず，進度に合わせて，プログラムを加えていくようにしている。
　このように構造化しておくと，同じプログラムの中にいっぺんに書くより，ディバッグも容易で，生徒がどこまでは動くというチェックをするのにも便利である。さらには，自分のオリジナルのゲームを作り始める時，アルゴリズムがばらばらになって収拾がつかなくなることもこれによってかなり防げるだろう。

　ファンクションキーF8でプログラムをチェックすることができる。間違いなく書けていたら，DO 〜 LOOP の中を何回もループする様子が分かるはずだ。DoEvents はほかの命令が来たらそっちのほうをやれということで，これによってLOOPからの脱出が行われる。
　うまくいけそうだったら，Visual Basic のウインドウにある をクリックしてボールが動くかどうか確かめてみる。止める時は■だ。（一時停止は だ）
　ここではBASICの特徴をしっかり説明する。例えば，「x=x+vx*dt というコードはそれまでの x の値に vx×dt をくわえたものを，新しいxの値としなさい。」という意味で，数学的なイコールではないことを解説する。すると x=Cells(3, 7) は，セル（3，7）の値を，xという名前の箱に入れるという意味であることを理解できるようになる。
　ここでは，ボールの等速運動がどのように表わされているかを読み取らせる。

Call ボールの壁反射()

壁での反射プログラム 9.65≦ x だったら vx の向きを180度変えて-vx にする。

Private Declare Function GetAsyncKeyState Lib "User32.dll" (ByVal vkey As Long) As Long

何の意味かは不明だが，「ごめんなさい。ちょっとキーボードを使わせてくださいねっ」というような意味だ。たぶん・・・。こいつを変数の宣言文のあるプログラムの最初に追加しておく。

If GetAsyncKeyState(37) < 0 Then
Rk = Rk - 0.3
End If

　キーボードの→矢印の番号は37（←矢印は38）となっていて，このコードを訳すと，←矢印キーを押した（＜0）なら，ラケットのｘ座標の値を0.3だけ減らしなさい。ということになる。これで，ラケットを動かすことができる。

　だいたい，僕自身，物理の研究で，大学でちょっとコードを書いたことがあるぐらいである。

　この程度のプログラムで，生徒たちは色んな工夫をして，オリジナルの作品を作ってくれる。昨年の生徒の作品の中には，重力場の中で，バスケットボールをするゲームをつくったものもいる。生徒のほうがずっと頭がいい。それを知るのも，この授業の面白さのひとつかもしれない。