Question

我正在VB.net为我的儿子制作一个刽子手游戏。我为每个字母制作了按钮，我也制作了一个单词列表。我遇到的问题是当我试图将猜测的字母打印到标签时。我不知道怎么做。有人可以帮帮我吗？

Answer 1

虽然您没有显示您的代码，但我会尽力帮助您。

一个简单的方法是：

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

现在你需要一个sub来检查用户是否按下了正确的字母：

 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")

当然你可以有一个事件来处理所有字母（甚至使用键盘输入），添加大写字母等向我们展示你的努力

Hangman游戏 - VB.net

1 个答案: