vf写删除一段字符中的字母字符命令程序,哪位大神帮忙写下吧。
2个回答
2012-12-29
展开全部
*换成以下代码
*
n=thisform.text1.value
m=" "
for i=1 to lenc(n)
if (asc(substrc(n,i,1))>=65 and asc(substrc(n,i,1))<=90 ) or ( asc(substrc(n.i.1))>=97 and asc(substrc(n,i,1))<=122)
loop
endif
m=m+substrc(n,i,1)
endfor
thisform.text2.value=m
*
n=thisform.text1.value
m=" "
for i=1 to lenc(n)
if (asc(substrc(n,i,1))>=65 and asc(substrc(n,i,1))<=90 ) or ( asc(substrc(n.i.1))>=97 and asc(substrc(n,i,1))<=122)
loop
endif
m=m+substrc(n,i,1)
endfor
thisform.text2.value=m
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
现在忙着呢,个人觉每个字符对应asc码,判断字符串里面的字符是不是英文 ,时就去掉,不是留下来就可以啦
追问
n=thisform.text1.value
m=" "
for i=1 to len(n)
if asc(substr(n,i,1))=90 and asc(substr(n.i.1))=122
m=m+substr(n,i,1)
endif
endfor
thisform.text2.value=m
这么写为啥运行不出来呢?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询