vb html table,VB6.0 如何是用 datatable

搜索热词

这里介绍新的datagrid.datasoure所对应的是VB6.0 datatable或dataset，而并不是原来的Recordset。所以，在使用中，要把Recordset转换成VB6.0 datatable或dataset。

VB6.0还是比较常用的，于是我研究了一下VB6.0 datatable，在这里拿出来和大家分享一下，希望对大家有用。

在VB6.0在，ADO是大家在数据库编程中用得较多的。而在新的vb.net中，虽然也可以用它来查询数据库，但在与新的datagrid的绑定中，不能像以前那样使用：“datagrid1.datasoure=rs”，而是需要一定的转化。因为新的datagrid.datasoure所对应的是VB6.0 datatable或dataset，而并不是原来的Recordset。所以，在使用中，要把Recordset转换成VB6.0 datatable或 dataset。我们以VB6.0 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 = 0 To adoRS.Fields.Count - 1

strcolname = adoRS.Fields(i).Name

t = adoRS.Fields(i).Value.GetType()

dt.Columns.Add(strcolname,t)

While (Not adoRS.EOF)

dr = dt.NewRow()

For i = 0 To adoRS.Fields.Count - 1

dr(i) = adoRS.Fields(i).Value

dt.Rows.Add(dr)

adoRS.MoveNext()

End While

Return dt

End Function

以上函数是实现将Recordset转换成DataTable。而我们要做的，就是在窗口的load中加入对ADO中的转化后再进行引用。

DimdtsAsDataTabledts=RecordsetToDataTable(rsuser,"login")

'其中rsuser为ado.Recordset,"login"为表名

DataGrid1.DataSource=dts.DefaultView

总结

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。

vb html table,VB6.0 如何是用 datatable相关推荐

用VB操作Excel（VB6.0）（整理）
用VB操作Excel(VB6.0)(整理). 一. VB读写EXCEL表: VB本身提自动化功能可以读写EXCEL表,其方法如下: 1.在工程中引用Microsoft Excel类型库: 从" ...
VB6.0和VB.Net对照表
想在网上找一下VB.Net中,哪些是VB6.0遗留下来的东西,哪些是VB.Net增加的东西.结果中文的没有找到,找到了一个日文网页.简单的翻译了一下,放在这里,供需要的人参考. VB6.0和VB.Ne ...
VB讲课笔记01：VB6.0安装与启动
VB讲课笔记01:VB6.0安装与启动一.安装VB6.0 VB6.0安装在Windows7.8.10上必须设置安装程序的兼容性. 1.设置安装程序的兼容性
大一计算机VB自学教程,2017秋VB6.0程序设计（兰州理工大学）
spContent=50年前,Basic的诞生结束了计算机只能由专业人员使用的历史,推动了计算机的普及.Windows操作系统的出现又将Basic推向一个新的高度--Visual Basic.它是一个 ...
vb升级java 解决方案_如何让VB6.0升级到VB.NET的过程变得更简单？
我以前都是用C#来写,这次搞这个VB.NET项目,有点突然.还好语言都是相通的. 1.虽说以前的Microsoft Visual Basic和.NET都是微软自己的东西,可有很多功能的实现方式还不一样 ...
vb计算机小数前没有0,vb6.0除法运算结果不显示小数点前的0
2016-09-01 01:18齐晓庆客户经理在加减乘除运算中,运算结果的类型和运算量的类型相同,由于类型不同,所以出错,要达到你目的可以1000\15 1000\25,由于1.5 2.5是小数所 ...
vb计算机怎么制作,vb6.0怎么制作一个抽奖小程序? vb6.0抽奖器的法
商场搞活动想要制作一个抽奖程序,今天我们就来看看使用vb6.0制作抽奖小程序的教程. 选择"用户自定义规则"并点击"新建"按钮,弹出选择新规则类型对话框(如图 ...
Access mysql oracle vfp C# vb6.0 VB.net java php delphi jsp asp.net人事管理系统成品源码
Access mysql oracle vfp C# vb6.0 VB.net java php delphi jsp asp.net管理系统成品源码 Access高铁票售票管理系统实现了用户注册.登 ...
vb安装提示计算机安装的新,win10系统电脑安装VB6.0企业版出现错误提示的步骤介绍...
有关win10系统电脑安装VB6.0企业版出现错误提示的操作方法想必大家有所耳闻.但是能够对win10系统电脑安装VB6.0企业版出现错误提示进行实际操作的人却不多.其实解决win10系统电脑安装VB ...

vb html table,VB6.0 如何是用 datatable

vb html table,VB6.0 如何是用 datatable相关推荐

最新文章

热门文章