Atribuir dados em um campo

[peixeweb 0]

Bom dia amigos eis o problema....

 

Em um formulario...

Tenho o campo Méd1, a onde vai a nota da primeira média e o campo Méd2 que ter a nota da segunda média, guando a nota da Recuperação for maior que qualquer nota da média tem que ir para o luguar da mesma

 

Ex:

se Méd1 = 4,4 e Méd2= 7 e a nota de recuperação for igual = 8 então essa nota tem que ir para Méd1 ou seja Méd1=8 vai limpa o campo Méd1=4,4 e substituir então fica Méd1=8

 

Obs...as notas das médias são colocadas automaticamente apos entra com as notas nos campos n1 e n2

 

o amigo do forum Criquio Calavera mandou esse codico:

 

 

If Me.Media1 < Me.Recuperação Then

Me.Media1 = Me.Recuperação

ElseIf Me.Media2 < Me.Recuperação Then

Me.Media2 = Me.Recuperação

ElseIf Me.Media3 < Me.Recuperação Then

Me.Media3 = Me.Recuperação

ElseIf Me.Media4 < Me.Recuperação Then

Me.Media4 = Me.Recuperação

End If

 

Que esta quase dando certo, so que dentro do campo Media1, nas propiedades de fonte de controle tem essa formula

=([N1]+[N2])/2, esta acoplada por isso ele faz o calculo, ele teria que limpa a nota antiga(campo no formulario) e colocar a maior.

 

Importante.... se nao estive acoplado funciona...

[Julien.Sorel 0]

Olá,

 

Antes, uma dúvida: você deseja incluir esta informação em uma tabela...?!

 

Caso sim - e se a tabela estiver vinculada ao form, basta substituir o que estive na origem de controle dos campos e informar apenas o nome do campo de origem, da tabela.

 

Caso não - e se eu não entendi corretamente, me envia uma mensagem explicando, que responderei assim que possível.

 

No mais, o código enviado à você esta correto...

 

 

...

 

o amigo do forum Criquio Calavera mandou esse codico:

 

If Me.Media1 < Me.Recuperação Then
    Me.Media1 = Me.Recuperação
ElseIf Me.Media2 < Me.Recuperação Then
    Me.Media2 = Me.Recuperação
ElseIf Me.Media3 < Me.Recuperação Then
    Me.Media3 = Me.Recuperação
ElseIf Me.Media4 < Me.Recuperação Then
    Me.Media4 = Me.Recuperação
End If[/Code]

 

Importante.... se nao estive acoplado funciona...[/Quote]

 

 

 

 

 

 

Sem mais,

 

Julien Sorel