sql = "insert into 作业记录表(生产状况编号,状况发生时间,状况结束时间) values (" '" & Trim(Text1.Text) & "'," & Now() & ","& ssss & ")"
        If DBExecuteSQL(sql) = -1 Then MsgBox Mssages
上面的text1.text是text1中输入的数字,now是当前时间,ssss是个全局变量...额~~~

解决方案 »

  1.   

    sql = "insert into 作业记录表(生产状况编号,状况发生时间,状况结束时间) values ('" & Trim(Text1.Text) & "','" & Now() & "','"& ssss & "')"
      

  2.   

    什么数据库?数据库当中"状况发生时间"和"状况结束时间"是怎么定义的?ssss是个什么类型的值?sql = "insert into 作业记录表(生产状况编号,状况发生时间,状况结束时间) values (" '" & Trim(Text1.Text) & "','" & Now() & "','"& ssss & "')" 或者sql = "insert into 作业记录表(生产状况编号,状况发生时间,状况结束时间) values (" '" & Trim(Text1.Text) & "','" & format(Now, "yyyy-mm-dd hh:nn:ss") & "','"& format(ssss, "yyyy-mm-dd hh:nn:ss") & "')" 
      

  3.   

    在看到unsigned的留言...
    很讨厌vb的一堆 "" '' () , 的破符号....我用2楼的可以用,但是3楼的程序跟2楼比较貌似多出了一对"" 额~~~