发新话题
打印

大小写转换

思路:  
m=""  
n=trim(request("textname"))  
for  i=1  to  len(n)  
if  mid(n,i,1)="1"  then  
m=m&"壹"  
end  if   
if  mid(n,i,1)="2"  then  
m=m&"贰"  
end  if   
....  
if  mid(n,i,1)="."  then  
m=m&"点"  
end  if   

next

TOP

发新话题