なぜVBは扱いが低いのか (200レス)
なぜVBは扱いが低いのか http://mevius.5ch.net/test/read.cgi/gamedev/1284400196/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
10: 名前は開発中のものです。 [sage] 2010/09/18(土) 14:08:42 ID:A4GUH+kV さてっとおいらがVBでゲーム作りますよってゲ製なんでゲーム作る話題にしようぜ とりあえず課題スレにある15パズルから作ろうとおもたけどいきなりは大変なので9パズルに挑戦な んで、下記はピースの動きのコード下にしか動かんけど、いい感じだフォームとピクチャーボックスでいける Sub picDown() Dim nowX As Integer = PictureBox1.Left Dim nowHeight As Integer = PictureBox1.Height Dim newY As Integer = PictureBox1.Top + nowHeight Dim idouY As Integer = nowHeight / 6 For i As Integer = 1 To 6 PictureBox1.Top += idouY Threading.Thread.Sleep(10) Me.Refresh() Next PictureBox1.Top = newY Me.Refresh() End Sub Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown If (e.KeyData = Windows.Forms.Keys.Down) Then 'MsgBox("↓", MsgBoxStyle.Information, "Form1_KeyDown") picDown() End If End Sub Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress MsgBox(e.KeyChar, MsgBoxStyle.Information, "Form1_KeyPress") End Sub http://mevius.5ch.net/test/read.cgi/gamedev/1284400196/10
12: 名前は開発中のものです。 [sage] 2010/09/18(土) 20:00:19 ID:A4GUH+kV おっす、おいら10 ちょっと進歩したぜ!あぁ>>11さんオイラシューティング苦手だから無理な ちょっとソース長くなったからここに貼らないほうがいいかな どこかUPローダーない? http://mevius.5ch.net/test/read.cgi/gamedev/1284400196/12
13: 10 [sage] 2010/09/18(土) 20:12:18 ID:A4GUH+kV あぁみっけた http://gmdev.xrea.jp/st/up/125.txt とりあえず、上下移動ができるようになった キモはピクチャーボックスオブジェクトを配列にいれて処理してるとこだな こりゃ楽勝だぜ http://mevius.5ch.net/test/read.cgi/gamedev/1284400196/13
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.815s*