Question

vb，如何卸载控件数组？

我用timer 定时添加image（i）控件，用的load语句
我想按下空格键（keycode=32）时将所有image（）删掉
但是当我输入unload image（） 时却出问题了！
怎么回事？能否给下代吗？

Answer 1

同一类型的方便写代码啊，比如说，你要做一个计算器，上面有command按钮1 2 3 ...
写代码的时候，这些肯定都是一类的，要知道这个按钮代表的是几直接这样写，

print comman1(index).caption
就知道你按的按钮是几了，要是不用控件数组的话，你会很悲剧的，

Answer 2

Option Explicit
Private Sub Command1_Click()
Dim obj
For Each obj In Controls
If TypeName(obj) = "Image" Then
Controls.Remove obj
End If
Next
End Sub
Private Sub Form_Load()
Dim i As Integer, obj As Object
For i = 1 To 5
With Controls.Add("VB.image", "img" & i)
.Visible = True
.Left = i * 1000
.Top = 1000
.Height = 1000
.BorderStyle = 1
End With
Next
End Sub