VB怎样读取数据库并显示出来？

VB读取数据库并显示出来的方法可参考下面用控件的实现方法：

ACCESS数据库，用VB6里的Data控件，选中它，设置属性：

DatabaseName 属性：连接到数据库文件

RecordSource 属性：连接数据表（可以用Select语句返回记录集）

然后使用它的：data1.Recordset.Fields(“字段名”)，就可以返回获得你说的内容了。

建立一个TextBox控件数组,在Text的Index属性里填上0 然后动态加载是Load

再调整位置就可以了

事件里写上

Dim NextIndex As Long

NextIndex = Text.UBound + 1

Load Text(NextIndex)

With Text(NextIndex)

.Width = Text(0).Width

.Height = Text(0).Height

.Top = Text(0).Height * NextIndex + Text(0).Top

.Left = Text(0).Left

.Visible = True

End With

---