我想要形成一个字串
dim temstr as string=""
for i= A to D
dim str=我是" & i & "文字，我是" & i & "电话
temStr=temStr=str
next
希望结果：
我是A的文字，我是A电话(要加断行符)
我是B的文字，我是B电话
我是C的文字，我是C电话
我是D的文字，我是D电话
dim s as string
for i = 65 to 75
s = s & "我是" & chr(i) & "的文字，我是" & chr(i) & "电话" & vbcrlf
next
msgbox(s)