怎样向ado手动添加记录,与数据库无关 在.net中,有hashtable,stringbuilder...等数据类型,可以不用知道上限的添加数据。vb里好像没有这样的数据类型吧?难道定义一个数组,然后再redim? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用rsRs.Addnewrs!字段=...不要Rs.Update 要无源 recordset ?与有源 recordset 类似,但是你必须自已添加字段。 Dim oNewRs As New ADODB.Recordset oNewRs.Fields.Append "fld1", adInteger oNewRs.Fields.Append "fld2", adChar, 60 oNewRs.Open Dim i As Integer For i = 1 To 10 oNewRs.AddNew oNewRs(0) = i oNewRs(1) = "这是第 " & CStr(i) & " 条记录。" oNewRs.Update Next oNewRs.MoveFirst Do While Not oNewRs.EOF List1.AddItem oNewRs(1) oNewRs.MoveNext Loop oNewRs.Close Set oNewRs = Nothing 执行上面代码时,记得在窗体上放个列表框 list1 另外,VB中有 Collection (集合)类型,类似 hashtable command控件的运用 窗体淡入淡出代码有问题 再次点击显示溢出 vb打印,困惑好久... WINDWOS的关机程序源码?在线等待 最简单的取字符串问题 ★★★【热烈探讨】★★★【程序员真的受年龄的限制吗?】 紧急呀!Activex Data objects 2.0 libary升级问题 数据库表复制的问题 简单问题,在线请教,请各位大虾指点!大门为你敞开,请进--- 关于三层结构。 如何开发电子杂志阅读器,哪里有资料 紧急求助:请问在VB中怎样将繁体字(Big5码)和简体字(GB2312码)转化为"UTF-8码"呢?
Rs.Addnew
rs!字段=
.
.
.
不要Rs.Update
oNewRs.Fields.Append "fld1", adInteger
oNewRs.Fields.Append "fld2", adChar, 60
oNewRs.Open
Dim i As Integer
For i = 1 To 10
oNewRs.AddNew
oNewRs(0) = i
oNewRs(1) = "这是第 " & CStr(i) & " 条记录。"
oNewRs.Update
Next
oNewRs.MoveFirst
Do While Not oNewRs.EOF
List1.AddItem oNewRs(1)
oNewRs.MoveNext
Loop
oNewRs.Close
Set oNewRs = Nothing