Como criar uma função de programação Microsoft Access

Uma função é um processo de programação que retorna um valor. Você também pode passar um valor a ela como um procedimento. As funções são programadas para o Microsoft Access com o Visual Basic for Applications (VBA) linguagem de programação.&# xD&# XD-VBA é a linguagem de programação amplamente utilizado para os produtos do Microsoft Office. Por causa deste artigo, vamos criar uma função simples que irá limpar a caixa de listagem em um formulário que irá criar.&# xD&# XD-Você precisa saber o básico de Microsoft Access para entender como fazer alguns procedimentos neste artigo.

Conteúdo

Abra o programa
Dicas & avisos

Abra o Programa
1
Abra o Microsoft Access e iniciar um novo banco de dados em branco.
2
Clique no "Forms" objeto na barra de ferramentas de banco de dados. Ele está localizado no lado esquerdo da página, sob o título "objetos".
3
Clique duas vezes em "Criar formulário no modo de design".
4
Adicionar uma caixa de listagem para o formulário no modo de design. Quando solicitado, especifique que você irá digitar os valores automaticamente durante o assistente de caixa de listagem. Digitar "Maçãs", "Laranjas", "Limões" e "Bananas" para os itens da lista. Nome caixa de listagem "lstFruit". Concluir as etapas do assistente e observe a sua lista com os valores no formulário. Faça a caixa de listagem capaz de fazer várias seleções a partir da janela Propriedades.
5

Adicionar um botão de comando. Clique no "Cancelar" botão quando o assistente é iniciado. Seu botão ainda estará na página. Nome do botão de comando "cmdClear" e defina a propriedade `Legenda` para "Claro".
6
Abra a janela Visual Basic, clicando no "Código" ícone na barra de ferramentas do `Design Form`.
7
Digite a seguinte função na janela de código:&# xD&# XD Função ClearList (LST Como ListBox) As Boolean&# xD &# XD Dim varItem As Variant&# xD&# XD Se lst.MultiSelect = 0 Then&# XD lst = NULL&# XD Else&# XD Para Cada varItem Em lst.ItemsSelected&# XD lst.Selected (varItem) = False&# XD Próximo&# XD-End If&# xD&# XD ClearList = True&# xD &# XD-End Function&# xD&# XD-Essa função limpa as seleções de uma caixa de listagem quando chamado. Para a função de trabalhar, você vai ter que chamá-lo e passar uma caixa de listagem a ele.
8
Chamar a função a partir do procedimento cmdClear_Click da seguinte forma:&# xD&# XD Private Sub cmd_Clear&# xD&# XD ClearList (lstClear)&# xD &# XD-End Sub&# xD&# XD-Como você pode ver, nós chamamos a função `ClearList "e passou a nossa caixa de listagem` lstClear `to it-contando a função que esta é a caixa de listagem que deseja usar.
9
Testar a sua função, clicando no "CmdClear" botão na vista "Forma".