Question

我正在开发一个小项目，其中一个组件使用动画骰子。我有骰子的机制，但是，我希望每次掷骰子时都能改变骰子颜色。

截至目前，我必须手动设置颜色（例如pnl1.Backcolor = system.Drawing.color.Red）。

我已经设置了一个具有各种不同颜色的数组，并打算使用随机数函数随机引用它们，但我的问题是如何以这样的方式引用数组中的项目上面提到的pnl1.Backcolor匹配说的颜色？

我很清楚我不能只使用system.Drawing.color.Colours(1)，所以我该如何解决这个/数组可能的替代选项是什么？

如果我格式化这个问题的方式与网站要求的方式不一致（我相对较新），那么我非常感谢任何和所有的帮助。我很抱歉。

谢谢，

〜约翰

Answer 1

我不确定你是否为骰子的每一面都有一个不同的面板，或者只是一个有图片更改的面板，不过，下面是你可以做的事情的一个例子。根据需要进行更改（我假设只有一个颜色更改的面板 - pnl1）。

Dim PanColor() As Color = {Color.White, Color.Red, Color.Green, Color.Blue, Color.Purple, Color.Yellow}
    pnl1.BackColor = PanColor(put_random_number_here_0_to_5)

引用一维数组中的文本以在一行代码中使用（vb）

1 个答案: