我要做的东西就是，按一次command1就画一个横线，画出5条线之后就停止划线。
然后按command2的时候就画一条竖线，也是画到第5条线就停止。
我初始化的时候添加了两条线，然后做的是控件数组，把两条线的index属性也改完了。
最终效果应该是一个
五子棋
的棋盘。

Private Sub Command1_Click()
Static i As Integer
If i < 5 Then
Set myline = Form1.Controls.Add("vb.line", "line" & i)
With myline
.Visible = True
.X1 = 100
.Y1 = 100 + i * 500
.X2 = 3000
.Y2 = 100 + i * 500
End With
i = i + 1
End If
End Sub

3楼的代码没有用到控件数组，楼主如果想用还必须把已经添加的控件删掉
其实，这就是个怎么用变量的事，以画横线为例：
Load Line1(n)
With Line1(n)
.Visible = True
.X1 = 1000
.X2 = 5000
.Y1 = n * 1000
.Y2 = n * 1000
End With
另外建议像3楼那样，改用Static定义n（每个按钮一个n），这样就不用考虑一个按钮用完还要把n清零的事情了
顺便再提一句，画线（或者画其他图形）也可以不用控件，而是用绘图方法，比如用Line画直线或者矩形（没错，也叫Line，但是比Line控件的功能还多一些），这里就不多说了，可以自行查找使用方法