Arquivo da categoria ‘Formulários’
Quinta-feira, Junho 19th, 2008 |
Esta era uma dúvida do leitor Elton Rueb e que ele mesmo conseguiu resolver antes de eu ajudar. O que o leitor pretendia era medir o tempo que um utilizador demora a inserir um registo e para isso tem 3 campos: 1 para a hora de inicio altura em que abre o formulário, 1 para a hora de fim que é inserida quando se clica no botão de gravar e 1 campo para calcular a diferença. Este é um exemplo simples mas que pode fazer falta a quem pretenda calcular diferença entre dois tempos. Por isso o Elton Rueb (Rio de Janeiro - RJ - Brasil) disponibilizou o exemplo para que pudesse ajudar mais alguém.
Download: Teste Hora
Escrito em Datas, Exemplos, Exemplos cedidos, Expressões, Formulários, Horas | Sem Comentários »
Quinta-feira, Junho 12th, 2008 |
O leitor Jacinto pôs uma questão aqui sobre como proceder para alterar o formato de uma data de 2008-06-12 para 2 0 0 8 0 6 1 2, a resposta tal como expliquei nos comentários é simples, basta uma caixa de texto com a seguinte expressão:
=formatar([o nome do campo data];”yyyy mm dd”)
e nas propriedades do campo pôr a seguinte expressão na máscara de introdução: 0\ 0\ 0\ 0\ 0\ 0\ 0\ 0\ 0
Bastante simples e fácil. Segue o exemplo para download: Formatar data
Escrito em Datas, Exemplos, Expressões, Formulários | Sem Comentários »
Terça-feira, Maio 6th, 2008 |
Este exemplo mostra como fazer um sistema de gestão de prestações de pagamentos.
O que este exemplo mostra e faz é criar automaticamente, com um clique num só botão, as prestações de um contrato de venda mediante os dados inseridos. Ou seja, introduzimos o nome do cliente a data de inicio do contrato e o valor total a pagar. Depois basta clicar no botão “calcular prestações” que ele gera automaticamente o número de prestações indicadas e divide o valor por cada uma delas e calcula a data de cada prestação( uma por cada mês). Este também é um exemplo que demonstra como acrescentar vários registos de uma só vez, porque ao clicar no botão ele acrescenta um registo para cada uma das prestações.
Download: Inserir Vários Registos
Escrito em Datas, Exemplos, Formulários, Módulos, Registos | 10 Comentários »
Domingo, Abril 6th, 2008 |
Para quem quer dar um efeito diferente nos formulários, mais propriamente quando estamos a introduzir dados , podemos alterar a cor do campo onde se encontra o cursor. Ou seja , todos os campos de introdução de dados estão com o fundo a branco excepto o campo onde estamos a escrever que está de outra cor.
Para fazer isto é muito fácil, basta seleccionar os campos e escolher a cor de fundo que queremos que apareça quando está o cursor no campo e de seguida alterar a cor para transparente.
Download: Mudar cor campo de dados
Escrito em Cores, Exemplos, Formulários | Sem Comentários »
Sábado, Março 29th, 2008 |
Este é um exemplo a pedido da leitora Sónia Campos que pretende uma base de dados para registar dados de animais. É uma base de dados simples com apenas um formulário para entrada de dados com fotografia do animal.
Download: Abrigo Animais
Qualquer modificação é só comentar aqui.
Escrito em Formulários, Fotos, Módulos, Registos, tabelas | 5 Comentários »
Terça-feira, Março 18th, 2008 |
A pedido do leitor João Cabrita desenvolvi este exemplo de controle de ponto que se aplica a um quartel de bombeiros, mais especificamente às necessidades do leitor.
É um exemplo básico, mas com alguns pormenores mais avançados em que o que se pretende com ele é fazer o controle das entradas e saídas dos funcionários, verificar se trabalharam um turno de 12 horas e somar as horas trabalhadas a mais e as horas trabalhadas a menos.
Tudo isto para obter um relatório mensal de assiduidade de cada funcionário.
Download: Ponto
Escrito em Consultas, Datas, Exemplos, Expressões, Formulários, Horas, relatórios | Sem Comentários »
Quarta-feira, Fevereiro 20th, 2008 |
Existem várias formas de introduzir um registo, sendo que a mais comum é fazer através de um formulário vinculado a uma tabela. Outra forma de o fazer é através de campos desvinculados, ou seja através de um formulário com campos independentes sem ligação à tabela. Para
introduzir os dados vamos utilizar o ‘recordset’, ou seja através de um código, que no caso deste exemplo é o seguinte:
Dim db As Database
Dim rs As Recordset
If MsgBox(”Deseja gravar?”, vbYesNoCancel, “Opções”) = vbYes Then
‘ Ao carregar no botão é perguntado se deseja gravar o registo ou não, no caso afirmativo continua o código senão termina
Set db = CurrentDb()
Set rs = db.OpenRecordset(”Dados”, dbOpenTable)
‘ Abre a tabela dados para inserir o registo
rs.AddNew
rs(”nome”) = Me!INome
rs(”morada”) = Me!Imorada
rs(”idade”) = Me!Iidade
rs.Update ‘ envia os dados para a tabela
rs.Close ‘ Limpa os dados e fecha o recordset
Set rs = Nothing
Set db = Nothing
Me.INome = Null ‘ limpa os campos no formulário
Me.Imorada = Null
Me.Iidade = Null
MsgBox “Registo gravado”, vbInformation, “Concluído” ‘ Exibe mensagem de confirmação
Me.INome.SetFocus ‘ Move o cursor para o primeiro campo
Else: Exit Sub
End If
Download: Introduzir Independente
Escrito em Exemplos, Formulários, Módulos, Registos, tabelas | Sem Comentários »
Terça-feira, Fevereiro 19th, 2008 |
Este exemplo mostra como efectuar cálculos com horas. É útil para quem precisa de saber quanto tempo decorreu entre uma hora de inicio e uma hora de fim. Não basta fazer a subtracção da hora de fim pela hora de inicio, porque caso a hora de fim passe de um dia para o seguinte as contas já não darão certas, por exemplo:
Hora Inicio: 23:00:00
Hora Fim: 02:00:00
Hora Fim - Hora Inicio = 02:00:00 - 23:00:00 = -21:00:00
Obviamente que não é assim tão simples trabalhar com horas, porque assim em vez de termos 3 horas como resultado correcto teríamos -21 horas erradamente.
Para contornar esta situação em que o período passa de um dia para outro temos que verificar primeiro se a hora de fim é superior à hora de inicio, caso seja maior então o cálculo é: Hora Fim - Hora Inicio.
Caso seja menor então temos que fazer o cálculo de outra forma, ou seja:
Hora Inicio: 23:00:00
Hora Fim: 02:00:00
Total de Horas: 23:59:59
Acerto: 00:00:01
Basicamente o que vamos fazer é somar 24:00:00 ao valor da subtracção para nos dar as três horas correctas. Ou seja:
Hora Fim - Hora Inicio + Total de Horas + Acerto = 02:00:00 - 23:00:00 + 23:59:59 + 00:00:01 = -21:00:00 + 24:00:00 = 03:00:00
Download: Calculo com Horas
Escrito em Exemplos, Formulários, Horas, Módulos | 5 Comentários »
Quarta-feira, Fevereiro 6th, 2008 |
Este exemplo mostra como escolher uma data através de um calendário PopUp. Ou seja, através de um módulo e de um formulário podemos escolher uma data como se trata-se de um calendário. No exemplo podemos escolher a data clicando no botão ao lado do campo data ou clicando com o botão do lado direito do rato no campo data. Esta forma de introduzir datas é bastante prática uma vez que nos permite ver um calendário e assim escolher melhor a data que pretendemos.
Download: Calendário PopUp
Escrito em Datas, Exemplos, Formulários, Módulos | Sem Comentários »
Domingo, Janeiro 27th, 2008 |
Normalmente quando rodamos o botão central de um rato num formulário, o access muda de registo. Em algumas situações pode ser bastante útil que isso não aconteça.
Este exemplo utiliza um modulo, no evento ao carregar do formulário, para impedir que o utilizador navegue pelos registos utilizado o scroll do rato. Para testar podemos utilizar a roda do rato (botão central) para ver que não muda de registo.
Download aqui: Roda do rato
Escrito em Exemplos, Formulários, Módulos, Rato, Registos | Sem Comentários »