textbox文本内容展示不出来

textbox文本内容显示不出来
sb1 = Replace(c(j1) & c(j2) & c(j3), " ", "")
  
  sb2 = Replace(c(j4) & c(j5) & c(j6), " ", "")
  
  za = dy & ":" & sb1 & "," & sb2
  

 Text1.Text = Text1.Text & vbCrLf & za 
代码如↑

变量声明全部写好 没错

sb1 ,sb2都运算出来了 且正确 

让我吐血的是运行后只显示 dy : sb1 后面的没了连那个","都没有 

如果将sb2与sb1的代码位置互换下则只显示 dy : sb2 后面的没了连那个","都没有  

这简直是蠢猪式的错误 吐血死

我知道提这个问题很蠢 但不提不行 这个错误很让人蛋疼
Dim c(0 To 9) As String * 10 
dim j As Integer
For j1 = 0 To 9
......c(j1) .... .
 ........代码
Next
运行后显示实时错误9 下标越界
我看了下错误语句 发现c(j1)中竟然j1=10 我明明声明的是
for j1 = 0 to 9 啊
怎么可能=10 
论坛里的大神们救救我吧 55555  
苹果熟了不会从树上掉下来了 直接飞天上去了 这让牛顿怎么发现万有引力啊555



------解决方案--------------------
你在这句上设置一个断点，然后运行程序。
在这儿中断后，你看看各个变量的值是否正常。
然后按一下 F8 ，在 立即窗口中执行：
print za

看看输出内容是什么，跟你想要的结果是否一致。