例如 ?函数(数据)
      字符型

解决方案 »

  1.   

    VarType函数返回值
    常数 值 描述 
    vbEmpty 0 Empty(未初始化) 
    vbNull 1 Null(无有效数据) 
    vbInteger 2 整数 
    vbLong 3 长整数 
    vbSingle 4 单精度浮点数 
    vbDouble 5 双精度浮点数 
    vbCurrency 6 货币值 
    vbDate 7 日期 
    vbString 8 字符串 
    vbObject 9 对象 
    vbError 10 错误值 
    vbBoolean 11 布尔值 
    vbVariant 12 Variant(只与变体中的数组一起使用) 
    vbDataObject 13 数据访问对象 
    vbDecimal 14 十进制值 
    vbByte 17 位值 
    vbUserDefinedType 36 包含用户定义类型的变量 
    vbArray 8192 数组 ^-^
      

  2.   

    ex.code:Dim IntVar, StrVar, DateVar, MyCheck
    IntVar = 459: StrVar = "Hello World": DateVar = #2/12/69# 
    MyCheck = VarType(IntVar)   ' 返回 2。
    MyCheck = VarType(DateVar)   ' 返回 7。
    MyCheck = VarType(StrVar)   ' 返回 8。^_^