高手帮我看个简单的vb题

来源：百度知道编辑：UC知道时间：2024/05/12 19:01:30

Private Sub Command1_Click()
Dim I As Integer, S As String, K As Integer
S = "TUPMOC": K = Len(S)
For I = 1 To K / 2
Mid(S, I, K - 2 * (I - 1)) = Mid(S, K + 1 - 1, 1) & Mid(S, I + 1, K - 2 * I) & Mid(S, I, 1)
Print S
Next I

End Sub
就这个啊,运行下来是
CUPMOT
CTPMUT
CTTPUT
可是Mid(S, I, K - 2 * (I - 1)) = Mid(S, K + 1 - 1, 1) & Mid(S, I + 1, K - 2 * I) & Mid(S, I, 1)
这个我看不懂啊?是什么意思啊?mid()可以这样用?奇怪了,整个过程都没出现"S=" 那S不就是原来的值吗?

Mid(S, I, K - 2 * (I - 1)) = Mid(S, K + 1 - 1, 1) & Mid(S, I + 1, K - 2 * I) & Mid(S, I, 1)
这句话其实也可以理解成一个替换语句
给你个简单点的例子，你运行下就明白上面那句话了
dim x as string
x="ABCDEFG"
mid(x,3)="99"
print x
x显示"AB99EFG"

高手帮我看个简单的vb题请高手帮我看个VB简单的语句，谢谢 vb 的高手帮我看一下高手帮我编个简单的VB编程`菜菜求助各位高手帮我一个忙:VB的,简单!!!!! 求人帮我写个简单的VB程序谁vb帮我写个简单的代码高手帮我看一段简单的ASP代码帮我看个简单的C程序我要个简单的VB程序