7,785
社区成员
发帖
与我相关
我的任务
分享文本转成字符串
有text1 text2...text50个文本框
我想把他们全部整合到成一个字符串,并且用空格分隔
就像是 s=text1.text & " " & text2.text & " " &..... & text50.text
但是我不想一个个text的输 那样要打50次text.text
有好的办法吗？
谢了
我想把他们全部整合到成一个字符串,并且用空格分隔
就像是 s=text1.text & " " & text2.text & " " &..... & text50.text
但是我不想一个个text的输 那样要打50次text.text
有好的办法吗？
谢了
...全文
请发表友善的回复…
发表回复
supergreenbean 2009-08-10
- 打赏
- 举报
Dim s As String
Dim i As Long
s = ""
For i = 1 To 50
s = s & Form1.Controls("Text" & CStr(i)).Text
Next