excel - 将随机图像添加到标签

Question

UserForm 2 = 36 个按钮（btn1 到 btn36） 每个按钮上都有一个图像。当我单击“添加”按钮时，我希望按钮上的三个随机图像显示在用户窗体 1 三个标签中，其中显示随机图像 1。

Answer 1

要选择随机按钮图像，您需要使用表单上的 Me.Controls 集合。例如：

Dim cCont As Control
For Each cCont In Me.Controls
    'DO STUFF HERE
Next cCont

如果你观察变量 cCont，你可以看到每个控件的所有属性。首先，您必须过滤掉作为按钮的控件。然后，您将不得不查看该按钮的图像属性以抓住它并在第二个表单上进行设置。

最后，要引入一个随机元素，只需使用 Rand() 函数。这将返回一个介于 0 和 1 之间的随机数。如果将其乘以 Me.Controls 中的控件数，然后将其四舍五入为整数，您将得到一个随机控件。只要确保您索引的控件是一个按钮，您就可以将该按钮的图像用作随机图像之一。