VB 隐藏窗体向可见窗体的listview写入数据问题

[zzhsbyzrz]

经测试：
A窗体(可见的) → 向B窗体(可见的)里的listview写入数据 是正常写入的

A窗体(隐藏的) → 向B窗体(可见的)里的listview写入数据 是不能成功写入的
请问 如何写入？问题在哪？如何解决？

主要代码如下：
A窗体主要代码(自动运行的)---------------

Private Sub Command1_Click()
For I = 1 To 30
cname="自动赋值"
sex="自动赋值"
age="自动赋值"

Dim itm As ListItem
Set itm = frm_B.ListView1.ListItems.Add(, , frm_B.ListView1.ListItems.Count + 1)
itm.SubItems(1) = canme
itm.SubItems(2) = sex
itm.SubItems(3) = age
Set itm = Nothing
Next
end sub

B窗体主要代码：---------------------
Private Sub Form_Load()
ListView1.ColumnHeaders.Add , , "ID", 500 '给列表中添加列名
ListView1.ColumnHeaders.Add , , "姓名", 1800
ListView1.ColumnHeaders.Add , , "性别", 1500
ListView1.ColumnHeaders.Add , , "年龄", 1500
end sub


难点：B窗体点击按钮 →　frm_A.Hide →　frm_A窗体自动加载运行、结束后自行关闭 →　结果frm_B窗体的listview没有数据

同样的代码与执行流程，区别在于：用frm_A.Hide时取不到数据 用frm_A.show时则顺利取到数据

问题在哪？急求高手解困。

[of123]

试试 frm_A.Hide 换成 frm_A.Visible = False