在你那里什么现象?在我这里可以读出来,typeof obj is datagrid 这句到datagrid的时候结果是true.

解决方案 »

  1.   

    那为什么下面的语句不能运行???(根据上面写的)
    MsgBox "ok"
                For i = 0 To obj.Columns.Count - 1
                    Theturn = Theturn + 1
                    cnn.Execute "insert into t (序号,名称,类型,所在窗体) values (" & Theturn & ",'" & obj.Columns(i).Caption & "','" & "DataGrid" & "','" & frm.Caption & "')"
                Next 
      

  2.   

    没有错误.就是读不出来,我在那里搞了个中断,得知程序根本就没有运行到那里.
    我的目的是将窗体里面所有的Dadagrid(个数不定)控件的列名读出来.