VB把 101数据库.ldb 筛选的信息放在text却只能筛选一个数据

没用过Aaccess 只会sql  你试下改成这样的语句行不行

If Not rs.EOF Then

    For i = 1 To rs.RecordCount

        Text1.Text =  Text1.Text & vbcrlf &  rs("全号")

    rs.MoveNext

    next

End If

可口可乐101系统是指可口可乐装瓶厂在某地区（通常以镇为单位）找一家批发商为合作伙伴，该批发商负责该地区可口可乐产品的配送，赚取一定数量的配送费。可口可乐装瓶厂则负责派驻业务员在该地区进行业务推广，双方各司其职共同发展。

扩展资料：

小知识

弧形瓶

可口可乐的蓬勃发展与巨大成功，引得竞争对手们纷纷效仿。他们对可口可乐的名称和标识略作变体，贴在瓶子上，一时间Koka-Kola、Koca-Nola、Koke等产品如雨后春笋般充斥市场。面对大量的仿冒产品，可口可乐公司与装瓶商合作，要求制瓶商提交新瓶形设计方案，要求设计必须独一无二，哪怕在黑暗中靠触觉也能辨别出可口可乐，甚至仅凭打碎在地的碎片，也能够一眼识别出来。

参考资料：百度百科-可口可乐

---