标题:请问一下怎么把一个字符串倒着输出?
只看楼主
liuyuhan
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-3-15
 问题点数:0 回复次数:8 
请问一下怎么把一个字符串倒着输出?
各位朋友,请问谁能帮我用控制台编一个能倒着输出一串字符串的程序/

如:输入:Student
输出:tnedutS
谢谢了,帮忙看一下哈!
搜索更多相关主题的帖子: 字符 输出 Student tnedutS 控制台 
2006-03-30 04:35
google
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:22
帖 子:3418
专家分:23
注 册:2005-11-1
得分:0 
num = "Student"
Dim a
ReDim a(Len(num))
For i = 0 To Len(num) - 1
a(i) = Mid(num, i + 1, 1)
Next

for i=len(num)-1 to 0
s=s&a(i)
msgbox s
next

[此贴子已经被作者于2006-3-30 10:12:40编辑过]


祝天下所有母亲幸福安康!~
2006-03-30 09:55
google
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:22
帖 子:3418
专家分:23
注 册:2005-11-1
得分:0 
不知道能不能实现

祝天下所有母亲幸福安康!~
2006-03-30 09:56
Knocker
Rank: 8Rank: 8
等 级:贵宾
威 望:47
帖 子:10454
专家分:603
注 册:2004-6-1
得分:0 
递规

九洲方除百尺冰,映秀又遭蛮牛耕。汽笛嘶鸣国旗半,哀伤尽处是重生。     -老K
治国就是治吏。礼义廉耻,国之四维。四维不张,国之不国。   -毛泽东
2006-03-30 10:01
google
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:22
帖 子:3418
专家分:23
注 册:2005-11-1
得分:0 
写代码好不好啊
我现在还是VB白痴呢

祝天下所有母亲幸福安康!~
2006-03-30 10:12
编程小虫
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2006-3-21
得分:0 

Dim num ,s as string
dim i,j as Integer
num="Student"
dim a(len(num)) as string
for i=1 to len(num)
a(i-1)=mid(num,i,1)
next i
for j=len(num) to 1 step -1
s=s & a(j-1)
next j
msgbox s

2006-03-30 11:53
liuyuhan
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-3-15
得分:0 

对不起,我没讲清,我是想问,用一维数组怎么搞,这个Mid简单,我就是想看用数组怎么搞,帮帮哈,谢谢了!


用最好的心情来面对最坏的事!
2006-03-30 13:26
google
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:22
帖 子:3418
专家分:23
注 册:2005-11-1
得分:0 
以下是引用liuyuhan在2006-3-30 13:26:00的发言:

对不起,我没讲清,我是想问,用一维数组怎么搞,这个Mid简单,我就是想看用数组怎么搞,帮帮哈,谢谢了!

以下是引用liuyuhan在2006-3-30 13:26:00的发言:

对不起,我没讲清,我是想问,用一维数组怎么搞,这个Mid简单,我就是想看用数组怎么搞,帮帮哈,谢谢了!

num = "Student"
Dim a
ReDim a(Len(num))
For i = 0 To Len(num) - 1
a(i) = Mid(num, i + 1, 1)
Next

for i=len(num)-1 to 0
s=s&a(i)
msgbox s
next



这个方法就是一唯数组!~


祝天下所有母亲幸福安康!~
2006-03-30 13:30
liuyuhan
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-3-15
得分:0 
THANKS!

用最好的心情来面对最坏的事!
2006-03-30 22:32



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-53820-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021273 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved