Codigo para duas condições If

Boa tarde Sr.s

Estou com uma dúvida, tenho um formulario chamado Frm_Resultado e uma caixa de combinação chamada cbo_caixa, qual é a dúvida eu quero que quando essa caixa receber o valor CASH, ela calcule um valor, porém se ela for vazia irá calcular o mesmo valor. Vou colocar um exemplo:

If Me.cbo_caixa.Value = "CASH" Then

Me.SaldoAnterior.Value = Me.azul.Value


Else
Me.SaldoAnterior.Value = Me.C.Value

End If

Veja que essa é mesma condição do "CASH", para vazia...

Alguém pode me ajudar?

Obrigado....

mas que valor que vc que que ela calcule, ou que receba o valor?
Tipo se ela receber o "CASH" coloca para somar os saldo que voce deseja.
DSoma([o valor que vai vir + o outro valor que deseja])
Ex:
if cbo = CASH then
Dsoma([saldoAnterior+ssaldoAtual])
else
'ão calcula nada
end if
end sub

Boa Sr Crysostomo

Eu acabei na correria colocando a condição errada...
Veja a necessidade não é somar mais nada, o que desejo e que quando a cbo_Caixa receber o valor "Cash" ou ela for vazia "" a caixa de texto SaldoAnterior = caixa de texto Azul, senão a caixa de texto SaldoAnterior = caixa de texto C, por isso o código abaixo:
If Me.cbo_caixa.Value = "CASH" Then

Me.SaldoAnterior.Value = Me.azul.Value


Else
Me.SaldoAnterior.Value = Me.C.Value

End If

A minha dúvida é colocar duas condições iguais para o IF para situações diferentes, ou seja quando a cbo_caixa for "Cash", ela executará a ação IF acima, mais também quando ela for Vazia "" também executará a mesma condição, se for diferente dessas duas condições executará a condição Else...

E mais ou menos por ai....
Obrigado pela ajuda...

usando o If , Else , você faz uma verificação , (se é falso ou verdadeiro), quando você quer colocar mais de um bloco para verificação você coloca Elseif

if condição1
  ....
else ........ "Aqui você esta fazendo uma ação"

Elseif   "com esse comando você coloca quantas operações você quiser".
para verificar os valores desejado.

Para verificar se a caixa está vazia:

Código:


  If IsNull(Me.cbo_caixa) Then
      MsgBox "Caixa está vazia", vbCritical, "Aviso"
      Me.cbo_caixa.SetFocus
      Me.cbo_caixa.BackColor = 646464
      DoCmd.CancelEvent
  End if
End sub


no momento estou no celular , qualquer coisa deixe o BD aqui com comentário nele , que damos uma olhadinha.