翻转一个字符串_visualbasic教程

2007-08-23 分类：心得技巧阅读(607) 评论(0)

下面的函数利用递归原理获得字符串的翻转字符串
Functionreversestring(revstrAsString)AsString
revstr:要翻转的字符串
返回值:翻转后的字符串

DimdoreverseAsLong

reversestring=””
Fordoreverse=Len(revstr)To1Step-1
reversestring=reversestring&Mid$(revstr,doreverse,1)
Next

EndFunction->

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com 特别注意：本站所有转载文章言论不代表本站观点！本站所提供的图片等素材，版权归原作者所有，如需使用，请与原作者联系。未经允许不得转载：IDC资讯中心 » 翻转一个字符串_visualbasic教程