有无办法实现以下功能:请大侠帮助

Question

你需要在form1中把ccrs定义为Public，然后在form2中用form1.ccrs的形式引用它。你上面的代码应该变成：With form1.ccrs
    .MoveFirst
    Do While Not .EOF
        Combo1.List(.Book - 1) = !full_name
        .MoveNext
    Loop
End With但是我觉得不推荐这样做，因为这样的话form1很可能无法彻底卸载(因为它的对象ccrs被其他form引用着)

Answer 1

你需要在form1中把ccrs定义为Public，然后在form2中用form1.ccrs的形式引用它。你上面的代码应该变成：With form1.ccrs
    .MoveFirst
    Do While Not .EOF
        Combo1.List(.Book - 1) = !full_name
        .MoveNext
    Loop
End With但是我觉得不推荐这样做，因为这样的话form1很可能无法彻底卸载(因为它的对象ccrs被其他form引用着)

Answer 2

对
尽量不要把Form的内容Public出去，当然如果它是主窗体（程序运行时一直存在则另当别论）