No Microsoft Access, um relatório dinâmico é um relatório que faz algo por si só : ele cria ou abre-se ou calcula um campo , por si só , de modo que você não precisa. Você especificar essas ações automáticas durante o projeto do relatório, utilizando a linguagem de computador Visual Basic for Applications. Coisas que você precisa
Microsoft Access
Show Mais instruções
1
Criar uma tabela de exemplo de vendas de filmes , utilizando os dados que se segue. Digite a linha superior dos dados como os nomes dos campos da tabela .
MovieTitle , Data da Venda, CustoUnidade , zhivogo qtysolddoc , 1/1/2009 , doc $ 5.01,3 zhivogo , 1/3/2009 , $ 4.95,2 boi verrugas, 1/5/2009 , $ 1.95,1 verrugas deslizante, 1/6/2009 , $ 0.95,2 zhivogo doc, 2009/01/13 , $ 3.00,1
2
Selecione "Criar " seguido por " Report" para criar um novo relatório. ( Acesso 2003 usuários , selecione "Objetos " e clique em "Relatórios" e "New". ) Clique com o botão direito na aba do novo relatório e selecione " Modo Design ". Clique no ícone de controle de caixa de texto em a barra de ferramentas Access, em seguida, clique em um espaço vazio à direita dos campos existentes, na seção " Detalhes" do relatório.
3
Selecione a caixa de texto à esquerda do par de caixas de texto que o Access criou automaticamente , pressione a tecla "delete" . Botão direito do mouse na caixa de texto restante e selecione " Propriedades".
4
Clique na guia "Dados" da janela "Propriedade Folha " , em seguida, digite o seguinte texto no "Controle fonte "campo :
= [ qtysold ] * [ CustoUnidade ]
5
botão direito do mouse na guia do relatório e selecione " View Report " para executar o relatório . Observe o novo campo calculado que você adicionou , que exibe o total de venda ( preço vezes quantidade unidade vendida) .
6
botão direito do mouse na guia do relatório e selecione " Modo Design ", em seguida, clique com o botão direito em qualquer lugar sobre o relatório e clique em " Propriedades do Relatório . " Clique na aba " Evento " da janela " Folha de Propriedades " , clique na seta para baixo no campo " no Load" . Selecione " Procedimento de evento ", clique no botão "... " para entrar no Visual Basic ambiente de desenvolvimento integrado (IDE).
7
Cole o seguinte sub-rotina sobre o actual " Report_Load " sub-rotina :
Private Sub Report_Load () wday = Dia da semana ( Now () ) Se ( wday = vbThursday ) ThenMe.Filter =" . ( [ moviesales ] [ movieTitle ] Como " " orientar * "") " ElseMe.Filter =" ( [ moviesales ] . [ movieTitle ] Como " " doc * "") "End IfMe.FilterOn = TrueEnd Sub
Substitua o texto que lê " vbThursday " com "vb "
8 Retornar para Access e re- executar o relatório, usando o passo 5 de instruções iniciais . Observe que somente as linhas que contêm " orientar " as verrugas são mostrados, porque o código de macro criado um filtro dinâmico para as linhas específicas, para quinta-feira.
9
Abra o relatório do " Modo Design ", usando passo 6 de instruções iniciais . Retornar ao evento " Report_Load " você digitou anteriormente ( Veja o passo 6 . ) Substitua o "vb " com "vb ", e então re- executar o relatório. Observe que apenas as linhas " doc zhivogo " são mostrados , com base na alteração feita para o código do programa .