很简单啊。DAO . 取得 FieldDef 可以判断ADO ye
也又类似的。

解决方案 »

  1.   

    用ADO。RECORDSET
    field.type
      

  2.   

    Dim fldOne As ADODB.Field
        
        For Each fldOne In Recordset.Fields
            Select Case fldOne.Type
                Case "adArray"
                Case "adBigInt"
                Case "adBinary"
                Case "adBoolean"
                Case "adBSTR"
                Case "adChapter"
                '
                '
                '
                Case Else
            End Select
        Next
    然后在Case子句中进行相应的处理。