最終更新日 2004/02/28


オセロゲーム VBA(Access)
VBAの勉強のため、オセロゲームを作ってみました。

セーブ機能やランキング機能もあるので割と本格的な雰囲気になってます。

ただし、VBAもSQLも勉強しながらの手探り状態で作ったので、いろいろ不具合もあると思います・・。
その辺はご了承ください・・。


ちなみにオセロ描画のところは、イメージコントロールを64個貼り付けて実現しています。
プログラム的にも2次元配列ではなく1次元配列を使っているのでちょっと違和感があるかも
しれません・・。ご注意ください。

オセロゲームのアルゴリズムは[プログラミング ティーショップ]さんを全面的に参考させて頂きました。
感謝!です。


それからファイルを開くとすぐにゲームが始まる設定にしてあります。
もしソース等が見たい方は、Shiftボタンを押しながらファイルを開いてください。


[オセロゲーム本体]

[オセロゲームソース その1]

[オセロゲームソース その2]


※2004/02/28追記
やっぱり画面の画像がないと分かりにくいかと思いますので、追加しておきます。


@↓これは起動時の画面です。「名前」「難易度」「順番」を決めてゲーム開始します。
起動時画面


A↓これはゲーム中画面です。セーブ機能や手詰まり時のパス機能もあります。
ゲーム中画面


B↓これはデータのロード画面です。中断したときの状態から再開できます。削除もできます。
ロード画面


C↓これはランキング画面です。ゲーム終了時に結果が保存され、それをレポート出力可能です。
ランキングレポート画面



※ちなみに・・一応、初級・中級・上級と用意しているのですが、いまひとつコンピュータが
 弱いです。おそらく、どこかにバグがあるんじゃないかと思います・・。
 もし分かる方がおられましたら、お知らせください。




■トップへ戻る
▲このページのトップへ戻る