为什么在调用过程中加入的数据在listview里会另起一行？

Question

我在原模块里向listview加数据，但有几列的数据从调用过程中调来加入几列数据，但问题就出现在调来的数据会另起一行显示。这是为什么呢？谢谢！我在原模块里的代码中有：
          Dim itmInfo As ListItem
 Set itmInfo = Me.ListView1.ListItems.Add
          itmInfo.Text = Trim(Text2.Text)
          itmInfo.SubItems(1) = Trim(Yxmc)
          itmInfo.SubItems(2) = CStr(Format(da, "yyyy/mm/dd")) Call showyhrq  '调用过程
itmInfo.SubItems(4) = Trim(rs!名称)在过程中的代码有：          Dim itmInfo As ListItem
Set itmInfo = Me.ListView1.ListItems.AdditmInfo.SubItems(3) = CStr(Format(CDate(Trim(buff2)) + jsrx, "yyyy/mm/dd"))  请各位赐教!

Answer 1

要用相同的Set itmInfo = Me.ListView1.ListItems.Add
你要把它传入过程showyhrq

Answer 2

我上面的过程中也要Set itmInfo = Me.ListView1.ListItems.Add
这句话啊。
怎么传？能说的具体点吗？