还得再通过value属性把text控件中需要填数值的都赋成0.00值，command5中代码也得赋成0.00值，需要留两位小数，否则输入时不能输入小数，然后完美运行~~~

      replace 岩石名称 with alltrim(thisform.text10.value);
              采样地点 with alltrim(thisform.text11.value);
              分析号 with alltrim(thisform.text1.value);
              现场号 with alltrim(thisform.text2.value);
              含水量 with VAL(thisform.text17.value);
              容重 with VAL(thisform.text5.value);
              干容重 with VAL(thisform.text3.value);
              岩块吸水率 with VAL(thisform.text18.value);
              粉末吸水率 with VAL(thisform.text6.value);
              胶结系数 with VAL(thisform.text4.value);
              浸水破坏性 with alltrim(thisform.text19.value);
              液限 with VAL(thisform.text7.value);
              塑限 with VAL(thisform.text8.value);
              塑性指数 with VAL(thisform.text20.value);
              胶结程度 with alltrim(thisform.text9.value);
              膨胀性 with alltrim(thisform.text13.value)

数字型的也可将text的inputmask属性值设为9999.99(保留2位小数)，一位小数设为9999.9

这是我最后得到的代码

with ……
    ……
    .text17.value=0.00

  

第三种方法并不高端啊，使用表单生成器制作的表单就是采用的该方法。

好的

加一条表单刷新就成了。

两个都赋值了，是不是只赋一个就行了

所有的，都要赋值。