VB点虐 如何添加winsock控件和Ado控件

步骤如下：

在铜陵等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供网站制作、做网站 网站设计制作按需网站策划,公司网站建设,企业网站建设,品牌网站建设,全网营销推广,外贸营销网站建设,铜陵网站建设费用合理。

1. 先到C:\WINDOWS\system32目录下看看你的系统里是否已经有了MSADODC.ocx和MSDATGRD.ocx这两个文件（多半是没有的），要是有了就直接看第2步吧。

然后放到C:\WINDOWS\system32目录下。

2. 在VS 2005中注册MSADODC.ocx和MSDATGRD.ocx这两个控件。在VS 2005中点击"Tools" -- "Visual Studio 2005 Command Prompt"，输入如下命令即可：

regsvr32 msadodc.ocx

regsvr32 msdatgrd.ocx

求教vb点虐 中ado的用法

我的理解是这样的，当你设置了 ADODC1.CONNECTIONSTRING 属性和 RECORDSOURCE属性时，这个时候ADODC1 并没有连接到数据库，并向数据库提出数据放到 其 RECORDSET 对象中，所以此时 RECORDSET 对象没有被建立和初始化，因此你尝试访问这个对象时就弹出错误了。

你当加入 Set Text1.DataSource = Adodc1 （意为将 TEXT1 绑定到 ADODC1）时，程序运行到这里，ADODC1会自动的连接数据库，并向数据库提取数据记录。因此此时RECORDSET 也就被建立被初始化了，你也就可以访问它了。

还有，你可以用 ADODC1.REFRESH 代替 Set Text1.DataSource = Adodc1 。作用如上。

ADO在vb点虐 中的使用（与datagrid结合）

;    在VB 在 ADO是大家在数据库编程中用得较多的 而在新的中 虽然也可以用它来查询数据库 但在与新的datagrid的绑定中 不能像以前那样使用 datagrid datasoure=rs 而是需要一定的转化 因为新的datagrid datasoure所对应的是 datatable或dataset 而并不是原来的Recordset 所以 在使用中 要把Recordset转换成datatable或 dataset 我们以datatable为例      Function RecordsetToDataTable(ByVal adoRS As ADODB Recordset ByVal strTable As String)       adoRS MoveFirst()    Dim dt As DataTable    dt = New DataTable(strTable)    Dim i As Integer    Dim strcolname As String    Dim t As Type    Dim dr As DataRow       For i = To adoRS Fields Count    strcolname = adoRS Fields(i) Name    t = adoRS Fields(i) Value GetType()    dt Columns Add(strcolname t)    Next          While (Not adoRS EOF)    dr = dt NewRow()    For i = To adoRS Fields Count    dr(i) = adoRS Fields(i) Value    Next    dt Rows Add(dr)    adoRS MoveNext()    End While       Return dt       End Function      以上函数是实现将Recordset转换成DataTable      而我们要做的 就是在窗口的load中加入对ADO中的转化后再进行引用       Dim dts As DataTable       dts = RecordsetToDataTable(rsuser login ) 其中rsuser为ado Recordset login 为表名    DataGrid DataSource = dts DefaultView lishixinzhi/Article/program/net/201311/13855

分享文章：vb点虐 引入ado库 vbnet andalso
文章出自：http://kswjz.com/article/ddjpcpd.html