Private Sub Form_Load()
Dim i As Integer
For i = 0 To 149
Commandl(i).Caption = ""
Next i
End Sub
怎么这样用不行啊?我想自己定义一个控件数组,把他们的标题用代码一起清空,在属性窗一个个太麻烦

我试没问题,你看看Commandl(i).Caption = ""是不是错了(你那是L)

'Command1.Index = 0,在设计时设置
Command1(0).Caption = 0
For i = 1 To 19
Load Command1(i)
Command1(i).Visible = True
Command1(i).Caption = i
Command1(i).Top = i * Command1(0).Top + (i + 1) * Command1(0).Height
Next
试试

Private Sub Form_Load()
Dim i As Integer
For i = 0 To Command1.UBound '这样最为保险，因为可能会新加按钮上去
Command1(i).Caption = ""
Next i
End Sub