search

nyela / Sistema-Hospitalar

Sistema Hospitalar
0 stars 0 forks source link

Sistema Hospitalar #1

Open nyela opened 4 years ago

nyela commented 4 years ago

Ferramentas de estudos: "udemy" Programa de uso para criar o sistema:"Access" Foi criado um Banco de Dado; Foi criado as tabelas para o sistema hospitalar; Após criar as tabelas foi configurado: as colunas da tabelas, cor, imagem, fonte; Foi criado os botões do sistema; Foi configurados os botões do sistemas; obs: sistema em andamento

nyela commented 4 years ago

Para configurar o botão de novo usamos esse comandos: Option Compare Database

Private Sub Detalhe_Click() DoCmd.GoToRecord , , acNewRec Me.CPF.SetFocus

End Sub

Foi feito o cadastro do convenio; Foi feito o cadastro do Paciente;

Falta fazer alguns modificações a tabela de paciente por exemplo: o botão novo configurar ao click nele ele limpar a tela e permitir um novo cadastro, etc.

obs: Sistema em desenvolvimento.

nyela commented 4 years ago

Campo sexo da tabela já configurado.

Foi configurado no sistema para mostrar no sexo: "F" ou "M" invés deu digitar a palavra feminino ou masculino só adiciono no cadastro F ou M.

obs: Falta verificar o botão de salvar na tabela de paciente.

Botão de salvar os dados da tabela: -Foi usado essa condições que ao salvar com o campo CPF ou nome em branco ele não permitir ser salvo. comando usado foi: "Private Sub btn_salvar_Click() If Me.CPF.Value = "" Or Me.Nome_Pac.Value = "" Then MsgBox "Preencha o Campo CPF" Else DoCmd.RunCommand acCmdSaveRecord MsgBox "Dados Salvos" End If "