Access中用VBA得到和修改数据库中表数据:
ADO :
Dim rstType As ADODB.Recordset
Dim strSQL as String
Set rstType = New ADODB.Recordset
strSQL =”Select F1,F2 From Table 1”
rstType.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic, adCmdText