问题备兆者猜庆:1
列表框名为L1,
你却有时用L1,有时用list1
2
a要定义全仿薯局变量
Dim
i
As
Integer
Dim
a
As
String
Private
Sub
L1_dblClick()
For
i
=
0
To
3
If
L1.Selected(i)
=
True
Then
L1.AddItem
a
End
If
Next
End
Sub
Private
Sub
Text1_Change()
a
=
Text1.Text
End
Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024