Dim s(20) As Long
......
s(0) = 400
StrSql = " Insert Into 表1 (ID,结果) values (18,s(0))"
.....
错误信息:表达式中's'函数未定义
是否values中不能用变量来代替数值

解决方案 »

  1.   

    StrSql = " Insert Into 表1 (ID,结果) values (18," & " s(0))"
      

  2.   

    StrSql = " Insert Into 表1 (ID,结果) values (18," & " s(0)" & ")"
      

  3.   

    StrSql = " Insert Into 表1 (ID,结果) values (18," & s(0) & ")"
      

  4.   

    StrSql = " Insert Into 表1 (ID,结果) values (18," & s(0) & ")"
      

  5.   

    老大,你是写错了,看看这样对不对,Dim s(20) As Long
    ......
    s(0) = 400
    StrSql = " Insert Into 表1 (ID,结果) values (18,s(0))":错误
    .....
    将StrSQL 改为:
    StrSql = " Insert Into 表1 (ID,结果) values (18," & s(0)& ")"
    这样应该就对了,你会守信给我加分吗,兄弟