Question

用VB读取sql表中某一个数据

数据库是sql2005，我的数据库结构如下，我只希望读取此表中的第一行第二列即那个“四国”，并将其赋值给一个变量，如变量 A.
我把sql的结构，服务器名都放出来了，另外，假设用户名是sa，密码是“123456”
求vb源码，添加什么控件，引用什么东西麻烦都说一下

Answer 1

添加一个ado控件

Private ConnSQL As New ADODB.Connection

Private Sub Form_Load()
ConnSQL.Open "driver={SQL Server};server=(local);database=xinjiaoyou;uid=sa;pwd=123456;"
Dim A:A = ConnSQL.execute("select top 1 uname from a_user where id =1915")(0)
msgbox A
End sub