是否可以使用VB6.0中的SQL语句向MS Access记录插入多个值？

Dim conn As ADODB.Connection
Dim cmd As ADODB.Command

Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\path\to\your\database.mdb"
conn.Open

Set cmd = New ADODB.Command
cmd.ActiveConnection = conn
cmd.CommandText = "INSERT INTO TableName (Field1, Field2) VALUES (?, ?)"

' 设置参数值
cmd.Parameters.Append cmd.CreateParameter("param1", adVarChar, adParamInput, 255, "Value1")
cmd.Parameters.Append cmd.CreateParameter("param2", adVarChar, adParamInput, 255, "Value2")

' 执行插入操作
cmd.Execute

' 清理资源
Set cmd = Nothing
conn.Close
Set conn = Nothing