Microsoft Office Access é um sistema de gerenciamento de banco de dados relacional incluídos na suíte Microsoft Office. Visual Basic for Applications (VBA) é usado para automatizar tarefas de rotina em aplicativos do Microsoft Office . Os programadores , por vezes, na necessidade de atualizar o valor de um registro específico em uma tabela de forma programática. Em poucos passos você pode escrever código VBA para atualizar um registro em uma tabela. Instruções
1

Selecione " Ferramentas de banco de dados . " Clique em " Visual Basic" para abrir a janela "Microsoft Visual Basic" .

Crie uma nova sub digitando " Private Sub editRecordSet ()" e pressionar "Enter ".
2

digite o seguinte para criar as suas variáveis ​​e definir o banco de dados atual :

Dim sqlstr as String

Dim rst Como Recordset

Dim dbs as Database

Set dbs = CurrentDb
3

Digite o seguinte para criar uma nova tabela :

SQLString = " CREATE TABLE editRecord ( F_Name TEXTO, l_name texto)"

DoCmd.SetWarnings Falso

DoCmd.RunSQL ( SQLString )
4

Digite o seguinte para adicionar três registros de dados para a tabela: INSERIR

strsql = " INTO editRecord VALUES (' SEBASTIAN ', ' PUGA ') "

DoCmd.RunSQL ( strsql )

strsql =" INSERT INTO editRecord VALUES ( 'Maria ', ' GONZALEZ ') " < br >

DoCmd.RunSQL ( strsql )

strsql = " INSERT INTO editRecord VALUES ( 'João' , ' LOPEZ ')"

DoCmd.RunSQL ( strsql )
< br > 5

Digite o seguinte para consultar a tabela e retornar todos os registros : (". SELECIONE editRecord * FROM editRecord " )

Set rst = dbs.OpenRecordset
6

digite o seguinte para se deslocar para o número recorde de três e atualizar o campo " F_Name " para " JUAN " :

Set rst = dbs.OpenRecordset (". SELECIONE editRecord * FROM editRecord " )

RST . Move ( 2)

rst.Edit

rst.Fields ( " F_Name " ) . Value = " JUAN "

rst.Update
7

Digite o seguinte para fechar o conjunto de gravar e lançar a variável " dbs " da memória :

rst.Close

Set dbs = Nothing

Pressione " F5" para executar a sua nova rotina .