关于msgbox 不显示的问题

恐龙哥 · 发表于 2024-1-15 14:43

在随机文件中定义了几个字段，当满足条件时显示，但出现了问题，当单独用msgbox时（第16行），比如msgbox nv.a或者msgbox nv.f 时能正常显示，但是当用"&"连接时，比如msgbox nv.a & nv.b & .......& nv.f，这各情况时，就只会显示nv.a，后面的都不显示。这是什么原因?谢谢大家

Private Type Numval
a As String * 10
b As String * 100
......
f As String * 100
end type
sub test_Click()
Dim nv As Numval
Open "c:\xyz.text" For Random As #1 Len = Len(nv)
recN = LOF(1) / Len(nv)
if ........ then
For iz = 1 To recN
Get #1, iz, nv
msgbox nv.a
msgbox nv.a & nv.b & ...... & nv.f
next
end if
Close #1
endsub

3190496160 · 发表于 2024-1-15 15:01

再循环过程中，先把要显示的信息赋值给一个变量，最后循环结束了，直接，msgbox 变量

liulang0808 · 发表于 2024-1-15 16:43

msgbox nv.a & nv.b & ...... & nv.f
后面部分，楼主确认下是否有对应的值？还是空的？

qline302 · 发表于 2024-1-15 20:54

把&改为+试试。

恐龙哥 · 发表于 2024-1-15 21:37

liulang0808 发表于 2024-1-15 16:43
msgbox nv.a & nv.b & ...... & nv.f
后面部分，楼主确认下是否有对应的值？还是空的？

有值，单独msgbox可以显示，而且以前都正常，突然就这样了。

恐龙哥 · 发表于 2024-1-15 21:38

qline302 发表于 2024-1-15 20:54
把&改为+试试。

我没想到叻，明天试试

liulang0808 · 发表于 2024-1-16 07:57

恐龙哥发表于 2024-1-15 21:37
有值，单独msgbox可以显示，而且以前都正常，突然就这样了。

建议还是上传模拟附件，便于大家调测

		自动登录	找回密码
密码			免费注册

[求助] 关于msgbox 不显示的问题