Question

初学者Visual Basic帮助：我要创建一个简单的游戏＆＃34;提示用户输入数字1-10。必须存储该号码。然后真正的游戏开始，使用循环让用户尝试猜测存储的数字。如果猜测太高，太低或正确，请通知。继续循环直到正确。

我现在非常困难;我只有 -

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim mynumber, input As Integer
        mynumber = Val(TextBox1.Text)
        input = TextBox1.Text

请帮助我知道这很简单，但这个课对我来说非常复杂。

Answer 1

所以，开始我将使用你的变量，我们将声明这些，以便整个表单可以访问它们。

Dim mynumber As Integer
Dim input As Integer

我们还将声明一个单独的变量，该变量将计算用户尝试猜测该数字的次数，以及他们将要猜测的数字，在这种情况下被称为{{ 1}}

guessnumber

您想要创建一个按钮并将其调用Dim counter As Integer Dim guessnumber As Integer，这将启动游戏，这将是您将添加到该按钮的代码：

btnNewGame

这将创建随机数，并在单击新游戏按钮时将其更改为新值，因此没有游戏是相同的。

我们现在要初始化计数器，以便每当新游戏启动时，用户所拥有的猜测量为0，我们还要初始化文本框，以便在点击新游戏按钮时它是空的

Dim mynumber As Random
guessnumber = Number.Next(10) + 1

现在，在单独的播放按钮下面，我们要添加此代码

counter = 0
txtInput.Text = ""

现在让我们添加一个'尝试'功能，该功能将一直运行直到用户猜到数字或超过3的转弯数量。您可以轻松改变转弯量。

Dim uni As Integer
uni = CInt(txtInput.Text)
counter = counter + 1

希望这对你有所帮助，请告诉我你的进展情况！

初学者Visual Basic帮助：我要创建一个简单的游戏＆＃34;提示用户输入数字1-10。必须存储该号码

1 个答案: