UC知道Vb：不能给只读属性赋值？！
来源：百度知道 编辑：UC知道 时间：2024/06/28 19:51:16
程序代码如下：
Public Sub Command3_Click()
Dim a
a = Split(Clipboard.GetText, " ")
For i = 0 To 17
Text1(i) = a(i) ‘就这里了，我是想让Clipboard的内容放到18个文本框里）
Next i
End Sub
我懂了……你们等一下，我去调试……
Public Sub Command3_Click()
Dim a
a = Split(Clipboard.GetText, " ")
For i = 0 To 17
Text1(i) = a(i) ‘就这里了，我是想让Clipboard的内容放到18个文本框里）
Next i
End Sub
我懂了……你们等一下，我去调试……
Public Sub Command3_Click()
Dim a(17)
For i = 0 To 17
a(i) = Clipboard.GetText()
Text1(i).Text = a(i) '就这里了，我是想让Clipboard的内容放到18个文本框里）
Next i
End Sub
这样修改后没有问题 能运行 结果正常 能实现你的功能啊
Public Sub Command3_Click()
Dim a(17) '修改部分
a = Split(Clipboard.GetText, " ")
For i = 0 To 17
Text1(i) = a(i) ‘就这里了，我是想让Clipboard的内容放到18个文本框里）
Next i
End Sub
Text1(i).Text = a(i)才对
text1(i)只是对象，要Text1(i).Text才可以给它值的。