『 その３－６ 』
|
■ タイマーイベントの実験 覚えたことはさっそく試してみるのである。
■ 実行してみる ではこのプログラムを実行してみよう。 「Start」ボタンをクリックすると１秒毎に数値がカウントアップされていく。 「Stop」をクリックすると止まる。実に幼稚なプログラムである。ついでにカウントアップが働いている状態で、何でも良いから別のアプリを起動してみよう。このカウントアップは他のプログラムと共存して同時に動いている。 ■ プログラムの解説 ２つのコマンドボタン用のソースコードは、 Clickイベントのところに書き込まれている。これらはマウスがクリックされた時に呼び出され、 Timer.Enabledに Trueか Falseというブール値をセットして、タイマーを動かしたり止めたりしているのである。 Timerに書き込んだソースコードは、現在の T_Countの内容を Picに表示して、数値を１つカウントアップしている。 Timerの Intervalというプロパティーには１０００を設定してあるため、このタイマーイベントは１秒間に１回発生することになる。 Generalという場所で Public T_Count& などというコードを書き込んだ。これは変数の宣言である。そう言えば「先生の恋人」プログラムの先頭で Dim i& などというコードを書き込んだ。これも変数の宣言である。 最初の T_Countであるが、 Generalの Declarationsという場所で Publicというキーワードを使って宣言すると、この変数はプログラム起動時に０という初期値が入り、プログラム終了まで生きている。そして、同一のフォーム内のプログラム全てがその変数を使うことができるのである。 次に i であるがこれは、そのプロシージャ（関数とかサブルーチン）が呼び出された時点で生成されて ０という初期値が入れられる。 Dimというキーワードを使って宣言する。そのプロシージャが処理されている間は生きているが、終了すると消えてしまう。同一のフォーム内であっても別のプロシージャからの使用は不可能である。要するに、その場限りの仮の変数と考えれば良い。 T_Countの場合は秒数をカウントするために使いたいので、起動から終了まで生きていてもらわなければ困る。それに対し i はその場で１００万回用のカウンターとして役に立てば良いわけであるから、プロシージャの終了と同時に消えてもらって構わないのである。 それから、両方における変数名のあとにつけられた&であるが、これは「長整数型」を表し、「As Long」と記述しても同じ事である。いずれ意味を説明するが、今は深く考えずに「整数を扱う変数は ＆ をつけて宣言する。」とだけ覚えておこう。（プログラマーは学者じゃないモード） |
（図１）
（図２）
（図３）
（図４）
（図５）
（図６）
（図７）
