重新使用OLEDB参数

可以通过使用命令参数对象(Command Parameters Object)，在执行多个命令时重复使用相同的参数。示例如下：

'创建连接对象 Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\User\Documents\Database.accdb")

'创建命令对象 Dim cmd As New OleDbCommand() cmd.Connection = conn cmd.CommandText = "UPDATE Employees SET Salary=@Salary WHERE Department=@Department"

'创建参数对象 Dim param1 As New OleDbParameter("@Salary", OleDbType.Currency) param1.Value = 50000 cmd.Parameters.Add(param1)

'第一次执行命令 cmd.Parameters("@Department").Value = "Sales" conn.Open() cmd.ExecuteNonQuery() conn.Close()

'第二次执行命令 cmd.Parameters("@Department").Value = "Marketing" conn.Open() cmd.ExecuteNonQuery() conn.Close()