一段vb程序

来源:百度知道 编辑:UC知道 时间:2024/04/25 09:47:40
麻a$="abbacddcba"
For i=6 To 2 Step -2
X=Mid(a,i,i)
Y=Left(a,i)
z=Right(a,i)
z=UCase(X & Y & z)
Next i
Print z
烦大家帮我注释一下,谢谢!!

a$="abbacddcba" '定义字符串变量a
For i=6 To 2 Step -2 '循环开始,从6到2递减,步长为2
X=Mid(a,i,i) '第一个i是开始位置,第二个i是要取得长度,从a中的第i处开始取长度为i的一串字符
Y=Left(a,i) '从a左边开始取i个字符
z=Right(a,i) '从a右边开始取i个字符
z=UCase(X & Y & z) '连接变量X Y Z 然后转换成大写
Next i '步入下一次循环
Print z '输出z

程序运行结果:
BAABBA