エクセル　VBA　excel vba コード　独学　学習　ブロック崩しゲーム　プログラム解説 1

メニュー内

①『開発』→②『挿入』

→③ActiveXコントロール内の『ボタン』を選択

十字『✚』ポインタに変わります

上図１を参考にボタンを作りましょう

メニュー内

①『開発』→②『挿入』

→③ActiveXコントロール内の『スクロールボタン』を選択

十字『✚』ポインタに変わります

上図１を参考にボタンを作りましょう

スクロールボタンを作り

メニュー内

①『開発』→②『プロパティ』を選択

『Max』を【5】

『Min』を【1】に変更します

今回は、Sheet1にプログラムを作成し

動作させています。

（プロシージャ）procedure　とは

Sub　プロシージャの名前（　）

End　Sub までの　ひとまとめ

パーツの事をプロシージャと呼びます。

車であれば、ドアやタイヤ、エンジン

とパーツが分かれているようにイメージすると理解しやすいです

区切りを判断できて、理解できるようにがまず一歩です

Option Explicit

は【変数】を宣言することチェックするための

チェック機能をしています。

便利な機能です。

変数宣言は　【箱】作り

型を決めた、変数（値を入れる箱）を用意していきます。

関係性のある変数名を付けることが一般的です。

bContinue は　boolean型　（正しいか違うか、真／偽をいれる型　

vz　～　Rk はSingle型　単精度浮動小数点型

n は　Integer型　

b_px(100) ～　b_vy(100) は静的配列の

宣言で　Dim 変数名(要素数) As 型名

要素数は　100ですので　

b_pxa(100)　の変数宣言は　左図のような

0から100までの横並びの箱部屋を作っていく

イメージをしましょう。

配列の考え方は、処理を早くしたり、複雑なプログラムをすっきりするために重要ですので理解しておきましょう。

プログラムを考える際に重要な

繰り返しの処理です。

終わる条件　が満たされるまで　繰り返します。

Calculate はプログラム内の再計算をする処理です。

式

x = x +vx × dt

y = x +vy × dt　計算したx,yを

Cell(3,3) へ x　を　Cell(3,4)へ y を代入します。

Call文で　「ボールの壁反射」、「ブロック崩し」、「ラケット」のプロシージャを呼び出し

実行します。

DoEventsは、

実行中のマクロを一時的にExcelにキー操作やマウスクリックなどのオペレーションシステムの

メッセージ処理をする機会を与えるための命令です。

ループを抜ける条件は　”bContinue”にTrueになれば、終了します。

Select　Case　の条件処理です。

指定した変数の値が　条件にあう場合

処理をします。

今回は　まず　Cells(3,3)ボールX軸の位置の値が

Case Is 0.95以上の場合

　-1　を　vxにかけて　vx　に入れる

Case Is 0.35以下の場合

　-1　を　vxにかけて　vx　に入れる

vxはボールの進む速さ（ボールの進む向きでもある）　”-1”をかけることで　逆側へと進みだす。

Y軸も同様に考えることができる。