Question

VB 每2个字符 加1个空格

比如有1段字串:
abcdefgh
我想用VB编一个函数把它转化成:
ab cd ef gh
怎么编啊?谁教教我?

Answer 1

Private Sub Command1_Click()
str1 = "反对撒发生的发方式"
For i = 1 To Len(str1) Step 2
temp = temp & Mid(str1, i, 2) & " "
Next
MsgBox temp
End Sub