龙盟编程博客 | 无障碍搜索 | 云盘搜索神器
快速搜索
主页 > 软件开发 > VB开发 >

翻转一个字符串

时间:2009-12-30 15:42来源:未知 作者:admin 点击:
分享到:
下面的函数利用递归原理获得字符串的翻转字符串
  Functionreversestring(revstrAsString)AsString
  'revstr:要翻转的字符串
  '返回值:翻转后的字符串
  
  DimdoreverseAsLong
  
  reversestring=""
  Fordoreverse=Len(revstr)To1Step-1
  reversestring=reversestring&Mid$(revstr,doreverse,1)
  Next
  
  EndFunction->

收藏文章
表情删除后不可恢复,是否删除
取消
确定
图片正在上传,请稍后...
评论内容为空!
还没有评论,快来抢沙发吧!
按钮 内容不能为空!
立刻说两句吧! 查看0条评论
精彩图集

赞助商链接