[求助]请问msgbox 是否有字数限制？

liustar123

我需要在msgbox中输出很多的文本，好几行，但是到了后面总是显示不全，后面的字被切掉了~~ 不知为什么

konggs

好像是511汉字吧。1023个字母或数字吧。

理论是1024.不知为何？

我利用这个测试的。你看看对不对：

Sub msgbox库()
    '汉字字库
    Dim a As Long
    Dim arr As String
    For a = 19968 To 40870
        arr = arr & VBA.ChrW(a)
    Next
    MsgBox arr
    俾
End Sub
Sub 俾()
  MsgBox VBA.AscW("俾")
  '20478
  MsgBox 20478 - 19968 + 1
  '511
End Sub

dew

你的好像没被截啊，你是不是就是存储在那个目录下了，你说被截了，那被截掉了什么呢？

liustar123

谢谢孔兄，可是我这个msgbox怎么也不会超过500个汉字~~  中间的换行我用的是 chr(13)

另外 ，下面没有显示全的那个路径 应该是  C:\Documents and Settings\Administrator.PUNK-LIU\桌面

他只给我显示了一半。 C:\Documents and Settings\Administrator

如果 我在前面在加几个字的话 ，后面的字又少了  C:\Documents and Settings\Admini     变成这样了

注：这段代码在别的机器上就没问题  

[em06]