'With Tables("tb4_尺寸信息")
'For i As Integer = 0 To ccxxhs-1
'xh2 = xh2+1
'cj3 = cj4 & "." & i+1
'cmd.CommandText = "Insert Into 尺寸参数方案库 (序号,层级,参数名称,配置,尺寸名称,数值,备注) Values(?,?,?,?,?,?,?)"
'cmd.Parameters.Add("@序号",xh2)
'cmd.Parameters.Add("@层级",cj3)
'cmd.Parameters.Add("@参数名称",iif(.Rows(i).Isnull("参数名称"),"Null",.Rows(i)("参数名称")))
'cmd.Parameters.Add("@配置",iif(.Rows(i).Isnull("配置"),"Null",.Rows(i)("配置")))
'cmd.Parameters.Add("@尺寸名称",iif(.Rows(i).Isnull("尺寸名称"),"Null",.Rows(i)("尺寸名称")))
'cmd.Parameters.Add("@数值",iif(.Rows(i).Isnull("最终数值"),"Null",.Rows(i)("最终数值")))
'cmd.Parameters.Add("@备注",th)
'cmd.ExecuteNonQuery
'Next
'End With
按照上面写,在单元格里赋值的就是NULL这4个字符。
2 按照上面改为参数化的方式后,能赋值第一行,第二行就报错: