我想要某种标签来计算数据库中导入的每条记录。
我是否需要为每个循环使用a?
有人可以解释我该怎么做,或者让我以正确的方式去做吗?
With cmd
.CommandText = "INSERT INTO Workflow ([Import], [DossierPad]) VALUES ('" + Import + "','" + Pad + "')"
.ExecuteNonQuery()
.CommandText = "INSERT INTO Data ([DossierPad], [Tif], [Grootte]) VALUES ('" + Pad + "','" + stukjes(0) + "','" + stukjes(2) + "')"
.ExecuteNonQuery()
If Tifcheck(Tif) = False Then
cmd.CommandText = "Update Data Set Tif = '" & Tif & "' WHERE Tif="
ElseIf Tifcheck(Tif) = True Then
End If
If stukjes(2) < 20000 Then
.CommandText = "UPDATE Data SET Blanco = '" & blanco & "' WHERE DossierPad = '" & Pad & "'"
.ExecuteNonQuery()
Else
.CommandText = "UPDATE Data SET Blanco = '" & blanco1 & "' WHERE DossierPad = '" & Pad & "'"
.ExecuteNonQuery()
End If
End With
这是我在数据库中插入记录的代码部分。 现在我的问题是如何获得一个标签来计算数据库中的每个记录。
答案 0 :(得分:3)
正如MSDN docs中所指定的,方法ExecuteNonQuery()返回受查询影响的行数。这通常用于检查插入查询是否正确结束。
所以你可以做的是在你的代码中的某处声明Integer
,并使用ExecuteNonQuery()
方法调用的结果递增这个整数。
最后,您可以使用整数值更新Label
。
一些代码:
'At the beginning of your update function
Dim myCounter As Integer
'...
'Whenever you run ExecuteNonQuery() on an INSERT statement
myCounter += .ExecuteNonQuery()
'...
'Finally, on the label that should display the result
myLabel.Text = "Updated " & myCounter.toString() & " rows."