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