&&根据fieldn类型将字符串fvalue转换成相应类型的值
PARAMETERS fieldn,fvalue
fieldtype = TYPE(fieldn)
do case
CASE fieldtype $ "CM"
&&字符型和备注型
fvalue = CHR(34) + ALLTRIM(fvalue) + CHR(34)
&&加上双引号
CASE fieldtype $ "DT"
&&日期型和时间型
fvalue = "ctod('" + ALLTRIM(fvalue) + "')"
&&转换成日期型
CASE fieldtype $ "NY"
&&数值型
IF EMPTY(fvalue)
fvalue = "0"
ENDIF
CASE fieldtype $ "L"
&&逻辑型
IF !INLIST(UPPER(fvalue), ".T.", ".F.")
fvalue = ".T."
ENDIF
ENDCASE
RETURN fvalue
请问一下楼上的这个要写在哪个事件呢