Visual Basic Express 2008随机化

时间:2010-04-26 13:51:03

标签: vb.net visual-studio-2008 random

我被赋予了一项任务:

开发一个程序,点击一个开始按钮,在屏幕上向孩子展示水果图片(五种水果中的一种)。然后,孩子将尝试识别水果并在屏幕上的指定位置写下其名称。点击一个复选按钮,您的程序将检查孩子写的水果名称,如果正确,将给孩子一个合适的信息。如果孩子提供的名称不正确,则应在红色背景上显示相应的消息,并在消息中包含正确的水果名称。

到目前为止,我已设法创建一个包含5个不同水果图片和下方文本框的表单。然后,表单底部的按钮会检查结果并显示一个消息框,告诉他们是否已通过或失败。

Private Sub btnResults_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnResults.Click
    If txtApple.Text = "APPLE" And txtOrange.Text = "ORANGES" And txtStrawberry.Text = "STRAWBERRIES" And txtGrapes.Text = "GRAPES" And txtBanana.Text = "BANANAS" Then
        MsgBox("Congratulations! you got it all right!", MsgBoxStyle.OkOnly)
        End
    Else
        MsgBox("Incorrect, please try again", MsgBoxStyle.OkOnly)
        End
    End If
End Sub

但是我无法将水果的图片随机化,所以它一次只显示一个水果并检查它。

感谢任何帮助。

由于

1 个答案:

答案 0 :(得分:1)

查看Random课程。

该页面上有一个例子

  

创建一个随机数生成器并调用其NextBytes,Next和NextDouble方法以生成不同范围内的随机数序列。

创建Random的新实例(仅执行一次 - 原因在该页面上解释。):

Dim rand As New Random()

然后

dim index = rand.Next(0, 5)

这将返回0到4之间的随机值。使用此索引选择要显示的图像。重复下一张图片。