学校の課題で VB でゲームを作成していますが、難易度設定の作成に問題があります。タイトル画面には、難易度を選択できるボタンが 4 つあります。ボタンの 1 つをクリックすると、メイン ゲームの「速度」変数に追加されるはずです。いくつかの方法を試しましたが、まだうまくいかないようです。
これが私が使用しているコードです。
主なゲーム変数:
Public speed As Single = 5
Dim xVel As Single = Math.Cos(speed) * speed
Dim yVel As Single = Math.Sin(speed) * speed
タイトル画面コード(難易度選択):
Private Sub btnPlay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPlay.Click
gameMain.Show()
If btnEasy.Enabled = False Then
gameMain.speed = 5
End If
If btnMedium.Enabled = False Then
gameMain.speed = gameMain.speed + 2
End If
If btnHard.Enabled = False Then
gameMain.speed = gameMain.speed + 5
End If
If btnInsane.Enabled = False Then
gameMain.speed = gameMain.speed + 10
End If
End Sub
ボタンをクリックすると無効になり、色が変わります。ゲームを開始するときに、ボタンの 1 つが無効になっていると、対応する量が「速度」変数に追加されます。
また、メイン ゲーム フォームに同様のコードを配置しようとしましたが、これも機能しませんでした。私はまだVBのアマチュアであるため、コードをできるだけ単純に保とうとしています。
任意の回答をいただければ幸いです。