Question

我需要开发一个随机图片生成器作为我的项目的一部分，因为我是一个新手我捏了一些互联网的代码，但是它抛出错误信息“对非共享成员的引用需要一个对象引用”。这是我的代码：

      Dim randnum As random
      Private Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click
    randnum = Random.Next(30)
    pbxPicture.Image = My.Resources.ResourceManager.GetObject("Image_" & randnum.ToString())
End Sub

我的资源中的图片被命名为“image_0”“image_1”等等所以我希望你能看到我在这里想要实现的目标，如果有人能帮助我，我会非常感激:)谢谢！

Answer 1

您必须instantiate randnum变量，然后在其上调用Next()。您还需要一个Integer变量来将Next()的返回值放入。

为清楚起见，我将第一个变量重命名为rand，并让整数变量的名称为randnum：

Dim rand As New Random 'Renamed variable and added the "New" keyword.
Dim randnum As Integer = 0 'An Integer variable to hold the result of "rand.Next()".

Private Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click
    randnum = rand.Next(30)
    pbxPicture.Image = My.Resources.ResourceManager.GetObject("Image_" & randnum.ToString())
End Sub

随机图片生成器给出错误“对非共享成员的引用需要对象引用”

1 个答案: