Question

请教 VB 中 很多command 的点击事件对应的过程都很相似，都是调用不同的控件的某些属性的，能用一个过程完

么？
Private Sub Form_Resize()
For a = 1 To 13 Step 4
For ad = 1 To a
Form1.Command(ad).Top = Form1.P1.Height + 360
Next
Next
End Sub问题补充：

Dim a As Integer

Dim ad As Integer

Answer 1

把这些Command做成一个控件数组就可以
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0
XXX.XXX=XXX
Case 1
XXXX.XXXX=XXXX
...
End Select
End Sub

追问

Private Sub Command1_Click(Index As Integer)
这句里 要用 COMMAND1 么？ 为什么？了

Answer 2

什么意思？

说清楚点\

Answer 3

什么意思啊
？？？~~~~