VB的问题——一方有难求八方支援
朋友问了一个问题，用VB怎么将横排文字改成竖排的，我表示这不在专业范围内，便到csdn来求助各种各样大神来帮助

[解决办法]
好像原来有个贴，你搜搜。。。
[解决办法]

VB code

Dim s$, temp$, myStr$, i%s = "朋友问了一个问题，用VB怎么将横排文字改成竖排的，我表示这不在专业范围内，便到csdn来求助各种各样大神来帮助"For i = 0 To Len(s) - 1  temp = Mid(s, i + 1, 1)  myStr = IIf(i = 0, temp, myStr & vbCrLf & temp)NextDebug.Print myStr
[解决办法]
一方有难八方支援是没问题的.
问题在于60分除以8除不尽啊,会引发血案的.  
古有二桃杀三士,今有六十分杀八方啊.