http://www.wzjcw.net/vbgood/taishan/index.html有代码可以参考

解决方案 »

  1.   

    字段都允许为空.
    Rst.AddNew
    Rst.Fields("Temperature") = TxtTemp.Text
    Rst.Fields("Humidity") = TxtHum.Text
    Rst.Fields("Frequency") = TxtFre.Text
    Rst.Fields("Resistance") = TxtRes.Text
    Rst.Fields("FreVol") = TxtVol.Text
    Rst.Update]
    其中TxtVol.Text为空
      

  2.   

    没提示,打开数据库access,表中就是没新增记录.
      

  3.   

    建议用:Rst.Fields("Temperature") = Trim(TxtTemp.Text)
    去掉空格。
      

  4.   

    用Adodc1.Refresh

    Data1.Refresh
      

  5.   

    要不就是用了ON ERROR GOTO 或 ON ERROR RESUME NEXT
    否则应该有提示
      

  6.   

    问题解决了,非常感谢各位!
    能不能说一下用Trim(TxtTemp.Text)去掉空格就行?
    先前如果是备注型字段为空,就能插入记录.为什么?