如果控件不是数组时使用.Index属性会出错。上网搜索了下
JAVA的用IsArray()判断一个对象是不是数组可是VB呢?VB用什么判断~?

解决方案 »

  1.   

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

  2.   

    楼上的方法对控件是不起作用的。这样吧,你肯定知道控件的名字的,可以判断form1.controls("名字").count是否大于0,是的话就表示是数组了。
      

  3.   

    也不行啊非数组控件也不能使用.Count的错误提示为 “对象不支持该属性或方法”
      

  4.   

    Option ExplicitPrivate 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
      

  5.   

    谢谢各位回答
    可还是有点问题我再捣鼓捣鼓yinweihong(真名:尹伟红) 的函数参数为控件名称就可以用
    但是
    for xContronl in Form1
        IsControlInArray(xContronl)
    next
    又不对了