请教,vfp如何查看完全的表单的源代码
发布网友
发布时间：2023-09-24 06:06
共1个回答
热心网友
时间：2023-09-25 15:55
按钮事件：
cStr = alltirm(thisform.text1.value)
try
if val(cStr) < 100 &&将字符型转化成数值型并检测是否小于100
thisform.releas() &&小于100则退出表单
endif
CATCH &&如果字符包含了非法字符（val(cStr) 会抛出错误，则跳到此处）则退出表单
thisform.releas()
endtry
&&条件满足了赋值
with thisform
.textbox2.value = subst(cStr,1,1)
.textbox3.value = subst(cStr,2,1)
.textbox4.value = subst(cStr,3,1)
endwith
