| カード・ゲームの制作 VB6 | |
| (1) フォームの準備 | |
1. フォーム、オブジェクトの準備
フォームには次図のようにカード用のオブジェクトを配置する。（注：オブジェクトはこれで全てではない）
◆ プロパティ
フォームのプロパティ
イメージ(Image)のプロパティ
|
ピクチャ(Picture)のプロパティ
ピクチャ(Picture)のプロパティ（配列(※2))
|
※1 カード全体の画像ファイル
→ Download:カード表裏画像cardbmp.lzh(3.9KB) (card1.bmp, card2.bmp)
※2 コントロール配列として配置する。
（参考 同じ種類のオブジェクトを複数配置する方法）
標準モジュールCardGame.basと同じフォルダに保存しておく。(ファイル名及びプロジェクト名はkabuとした)
2. 標準モジュールの追加
カードゲーム用に作成した標準モジュールのファイルCardGame.basをこのプロジェクトに追加する。
標準モジュール作成については(d) 標準モジュールの作成1、(e) 標準モジュールの作成2 を参照のこと。
| 追加手順 メニューから ［プロジェクト(P)］ → ［標準モジュールの追加(M)］ を選択すると、ダイアログ（左図）が表示される。 ① ［既存のファイル］タブをクリックする。 あらかじめ標準モジュールのファイルCardGame.basは用意してあるため。
② ファイルの場所をファイルCardGame.basが保存されているフォルダに変更する。 ③ ファイルCardGame.basを選択する。 ④ ［開く］をクリックする。 |
 |
| 追加された標準モジュールのファイルはプロジェクトウィンドウで確認できる。 プロジェクトウィンドウが表示されていないときは、メニューから［表示(V)］→［プロジェクトエクスプローラ(P)］を選択して表示する。
|
 |
テスト
オブジェクトを配置し、標準モジュールを追加したところで簡単なテストをする。
標準モジュールにあるCardMoveプロシージャを使ってpicWorkオブジェクトを場のカード4カ所(picCard(0)など)に配布する。次のリストをForm_Loadプロシージャに作成して実行する。
・テストプログラムリスト
Private Sub Form_Load()
frmKabu.Show '※1
picWork.Visible = True '表示設定
CardMove picWork, picCard(0)
CardMove picWork, picCard(3)
CardMove picWork, picCard(6)
CardMove picWork, picCard(9)
CardMove picWork, picCard(12)
End Sub
※1 フォームを表示するメソッドである。これがないと、このプロシージャがEnd Subで終了した後にフォームが表示されるので移動している状態(アニメーション)が見られない。
確認ができたらForm_Loadプロシージャに入力したテスト・プログラムは削除しておく。
| (1) フォームの準備 | |
| Copyright © 2004 Hiroshi Masuda | |