Asc(Left(td.Name, 1) >= Asc("0") 少了一个括号 ) 。
没有97计本的么?

解决方案 »

  1.   

    你也可以用
    val(Left(td.Name, 1)) >= 0
    代替
    Asc(Left(td.Name, 1)) >= Asc("0") 
      

  2.   

    If Left(td.Name, 4) <> "MSys" And Asc(Left(td.Name, 1)) >= Asc("0") And Asc(Left(td.Name, 1)) <= Asc("9") Then
      

  3.   

    两个问题:
    1. Wesely(无奈太多)提到的问题(相信是笔误);
    2. next td去掉td
      

  4.   

    dim td as new tabledef试试?
      

  5.   

    tabledef如果是对象的话应该需要初始化
      

  6.   

    我把left 改成mid就可以了。在该工程的本模块中的left的快速信息提示"left=2"
    而我用同样的代码在另一个新建的工程中试验时可以用的,left的快速信息提示"LEFT AS SINGLE".
    同时要谢谢各位的参与!