十万火急!求助,一个很简单的问题!

Question

Dim rs As New ADODB.Recordset
    Dim a As String
    rs.Fields.Append "A", adchar, 10, adfldisnullable
    rs.Fields.Append "b", adDate   
    rs.open上面的语句,怎样为 A,B字段赋值!

Answer 1

Public Sub CreatData()Dim i As Integer, j As IntegerFor i = 0 To 6
   adoRecordset.Fields.Append "n * " & i + 1, adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
Next i
 
adoRecordset.Open
For j = 0 To 0
   adoRecordset.AddNew
Next j
Set DataGrid1.DataSource = adoRecordset
該怎麼賦就怎麼賦予呀
addnew就行了 

Answer 2

adoRecordset.Fields.Append "n * " & i + 1, adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable是什么意思呀??

Answer 3

创建可更新 Recordset 对象的新记录。语法recordset.AddNew FieldList, Values参数FieldList   可选。新记录中字段的单个名称、一组名称或序号位置。Values   可选。新记录中字段的单个或一组值。如果 Fields 是数组，那么 Values 也必须是有相同成员数的数组，否则将发生错误。字段名称的次序必须与每个数组中的字段值的次序相匹配。

Answer 4

adoRecordset.Fields.Append "n * " & i + 1, adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable///////////adorecordset是recordset的名稱
Append是追加字段的名稱n * " & i + 1

Answer 5

rs.addnew
rs.newColumnName = "ABC"