Dim LastId As Integer
Dim insert As String = "......"
Using command = New SqlCommand(insert, connection)
With command
......
End With
connection.Open()
command.ExecuteNonQuery()
LastId = command.ExecuteScalar()
End Using
------解决思路----------------------
ExecuteNonQuery() 和 ExecuteScalar() 都是执行一次语句,所以你执行了两遍
区别是ExecuteNonQuery返回受影响的行数
ExecuteScalar返回结果集中第一行第一列的值,是Object类型