7,763
社区成员
发帖
与我相关
我的任务
分享为什么我赋值的一个字符串被自动截成了255个字节？
我先dim一个string，然后赋了一个长字符串进去，当把这个string作为参数传给函数时发现被截断了，只有255个字节长，怎么解决？谢谢
...全文
请发表友善的回复…
发表回复
yinweihong 2004-04-23
- 打赏
- 举报
字符串做参数最多255个字符长
把他截成字符数组试试
把他截成字符数组试试
northwolves 2004-04-23
- 打赏
- 举报
Dim a As String
Private Sub Form_Load()
a = String(500, "a")
MsgBox a, 0, Len(a)
MsgBox copya(a), 0, Len(copya(a))
End Sub
Function copya(ByVal a As String) As String
copya = Replace(a, "a", "b")
End Function
Private Sub Form_Load()
a = String(500, "a")
MsgBox a, 0, Len(a)
MsgBox copya(a), 0, Len(copya(a))
End Sub
Function copya(ByVal a As String) As String
copya = Replace(a, "a", "b")
End Function
龙华 2004-04-23
- 打赏
- 举报
Dim aa As Variant比较合适。
ryuginka 2004-04-23
- 打赏
- 举报
String * length
定义定长的字符串,比如
dim aa as string*5000
定义定长的字符串,比如
dim aa as string*5000
yoki 2004-04-23
- 打赏
- 举报
你是怎么定义的？应该string就可以的
dim a as sting
a="dddddfgdtertaafdsbasdfbb..."
dim a as sting
a="dddddfgdtertaafdsbasdfbb..."
ryuginka 2004-04-23
- 打赏
- 举报
Dim aa As Variant
