私は息子のために VB.net でハングマン ゲームを作っています。各文字のボタンを作成し、単語のリストも作成しました。私が遭遇している問題は、推測された文字をラベルに印刷しようとしているときです。これの仕方がわかりません。誰でも私を助けてもらえますか?
質問する
2049 次
1 に答える
2
コードを表示していませんが、お手伝いします。
簡単なアプローチは次のとおりです。
Private sWord As String 'Your word here
Dim arrayLetters As Array
arrayLetters = sWord.ToCharArray
For i = 0 To arrayLetters.Length - 1
Dim lbl As New Label
lbl.Text = "_"
lbl.Tag = arrayLetters(i)
lbl.AutoSize = True
Me.FlowLayoutPanel1.Controls.Add(lbl) ' Assuming that you have added a FlowLayoutPanel in your form to handle your labels (AutoSizeMode=GrowAndShrink)
Next
次に、ユーザーが正しい文字を押したかどうかを確認するためのサブが必要です。
Private Sub CheckLetter(ByVal letter As Char)
For Each lbl As Label In FlowLayoutPanel1.Controls
If lbl.Tag = letter Then
lbl.Text = letter
Else
'Whatever you like if the user make a mistake
End If
Next
End Sub
ボタンのクリックを処理するイベントで
CheckLetter("Here you put the corresponding letter")
もちろん、1 つのイベントですべての文字を処理したり (または入力にキーボードを使用することもできます)、大文字を追加したり
できます。
于 2012-11-06T14:53:39.620 に答える