[Resolvido]Ajuda com formulários

Estou desenvolvendo um programa para uma loja, já estou no final do programa, mas estou apanhando na abertura e fechamento do caixa. Como seria isso:
Tenho UN formulário chamado abertura onde o cliente informa nome, data e horário e outro formulário chamado fechamento com os campos data e horário, gostaria de quando o caixa estivesse fechado o cliente não conseguisse abrir o formulário de vendas somente conseguir vender após abrir o caixa, não sei nem como fazer isso se alguém tiver um exemplo e puder me ajudar ficaria muito grato.
Desde já agradeço.

se a informação "Fechado" se encontrar em uma tabela.. e sempre o ultimo registro da tabela fizer referencia a esta informação..

Podes utilizar o DMax... ou seja ver se o no ulttimo registro o campo está com valor = Fechado, caso sim, não procede a abertura do form de vendas.

Cumprimentos.

Teria algum exemplo?

Utilizando uma solução do Mestre Avelino, na utilização do Dmax, retornando mais de um campo:


Private Sub btnOpenfrm_Click()
Dim Seq As String
Dim K() As String

'Carrego a sequencia de campos que me interessam, separados pelo simbolo grafico |
Seq = "[Código] & '|' & [CpStatus]"
'Busco na tabela o valor maior de código, trazendo consigo a informação do cpStatus
Seq = DMax(Seq, "tblExemplo")
'Carrego uma matriz de tamanho variável com os valores retornados (Código e cpStatus)
K = Split(Seq, "|")
'Observe que sempre o primeiro valor será (0) e o outro (1) e assim por diante, dependendo que quantos campos pesquisou


'Verifico se o ultimo registro pesquisado tem no cpStatus a informação Fechado
'Caso tenha abre o form
If K(1) = "Fechado" Then
DoCmd.OpenForm "FormVendas"
'Caso contrário emite mensagem
Else
MsgBox "Você não pode realizar esta Operação", vbCritical, "NEGADO"
End If
End Sub


https://dl.dropbox.com/u/26441349/AlfaOmega.rar

Cumprimentos.

Muito Obrigado amigo era realmente isso o que eu precisava.

Uma dica amigão, ao responder no tópico não há necessidade de alterar o título da mensagem, deixe-a sempre em branco.

O Fórum agradece o Retorno.

Bom trabalho.

*** Título modificado para melhor compreensão dos demais usuários

Só faltou o resolvido...

Desta vez eu coloco.

Abraços.