rs3.Fields("编号").Value = "Format(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 8), "yyyymmdd")" & "Format(Val(Replace(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 3), "kV", "")), "000")" & "Format(a, "000")"
各位老师上面的代码书写提示存在错误,请各位老师帮忙改正,谢谢
MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 8)为日期,MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 3)为字符串,a为整数

解决方案 »

  1.   

    rs3.Fields("编号").Value = Format(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 8), "yyyymmdd") & Format(Val(Replace(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 3), "kV", "")), "000") & Format(a, "000")
      

  2.   

    rs3.Fields("编号").Value = Format(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 8), "yyyymmdd") & Format(Val(Replace(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Rows - 2, 3), "kV", "")), "000") & Format(a, "000")
      

  3.   

    去掉3个Format最外边的引号就对了
      

  4.   

    "format()"
    这样表示为一个字符串,而非调用format()函数