Question

VB 字符串互换问题

比如有这样和几行字：
吃饭 今天
睡觉 今天
看书 明天
打球 明天

在VB代理如何能实现 今天和明天在前面。吃饭，睡觉，看书，打球在后面？

今天 吃饭
今天 睡觉
明天 看书
明天 打球
今天 明天 是固定的。其它是随即的

Answer 1

Dim Mystr As String, StrA() As String, i As Integer, a As Integer
Mystr = "（今天吃饭之类的字符）"
StrA = Split(Mystr, vbCrLf)
Mystr = ""
For i = LBound(StrA) To UBound(StrA)
a = InStr(1, StrA(i), " ") - 1
Mystr = Mystr & Right(StrA(i), a) & " " & Left(StrA(i), a) & vbCrLf
Next

Mystr储存原文和顺序颠倒后的文字，
这段代码作用是将每行“x y”变成“y x”（就是以空格分隔的两段字符倒过来）

Answer 2

你能不能把你的过程 大概说一下 就是 怎么获得字符串 输入呢 还是 ？ 还有怎么运行 说出过程来 我给你编一段 程序

Answer 3

编号了