Help~ 如何判断一个对象是不是数组 或者 如何判断一个控件是不是数组

[kmlxk0]

如果控件不是数组时使用.Index属性会出错。

上网搜索了下
JAVA的用IsArray()判断一个对象是不是数组

可是VB呢？VB用什么判断~？

[kmlxk0]

也不行啊

非数组控件也不能使用.Count的

错误提示为 “对象不支持该属性或方法”

[fishmans]

你做个函数，用楼上的方法加出错来判断吧

[yinweihong]

Option Explicit

Private Sub Form_Load()
MsgBox IsControlInArray(Command1)

MsgBox IsControlInArray(Command2)
End Sub
Public Function IsControlInArray(ctl As Object) As Boolean

IsControlInArray = TypeName(ctl) = "Object"

End Function

[kmlxk0]

谢谢各位回答
可还是有点问题。。。我再捣鼓捣鼓

yinweihong(真名:尹伟红) 的函数参数为控件名称就可以用
但是
for xContronl in Form1
IsControlInArray(xContronl)
next
又不对了

[zou19820704]

等待中

[conrad_wan]

TypeName:
返回字符串，以整数为例，如果是数组，返回"Integer()"，如果不是，返回"Integer"

[province_]

楼上的方法对控件是不起作用的。

这样吧，你肯定知道控件的名字的，可以判断form1.controls("名字").count是否大于0，是的话就表示是数组了。