使用 For Next 循环清除所有控件

Question

我有一个按钮可以重置井字游戏，但它不起作用。我找到的每个示例都显示相同的布局。任何想法出了什么问题？

初始按钮被禁用，直到您开始新游戏（此按钮）。它应该启用按钮并清除所有 X 和 O ......

Dim ctl As Control
For Each ctl In Me.Controls
    If TypeOf ctl Is Button Then
       ctl.Text = ""
       ctl.Enabled = True
    End If
Next ctl

点击后，什么都没有发生...

编辑：经过进一步调查，我发现它只影响“新游戏”按钮。我想要影响的实际按钮在 GroupBox 内是这个原因吗？如何遍历 GroupBox 中的控件？

Answer 1

您可以使用 GroupBox1.Controls（或任何名为 groupbox 的名称）访问这些控件。只需使用 GroupBox1.Controls 而不是 Me.Controls。