[Resolvido]Limpar campos em formulário

Boa tarde pessoal!

Mais uma vez precisando da ajuda de vocês!

Tenho um formulário de vendas onde tenho uma combo em que escolho se o exame é por conta "Loja" ou "Cliente". Quando escolho "Loja", ele me dá a opção de escolher um código de consulta onde me diz o médico, e a data da consulta, já filtrando pelo cliente.

O que eu preciso é que depois de escolher "Loja", se eu quiser alterar para "Cliente" ele apagar os dados de CodConsulta, Nome_Medico e DtConsulta.

Tentei da forma abaixo, mas ele me dá mensagem de erro no Cod_Consulta.

Private Sub cmb_Exame_AfterUpdate()
If cmb_Exame = "Cliente" Then
   Me.cmb_CodConsulta = ""
   Me.txt_MedicoConsulta = ""
   Me.txt_DtConsulta = ""
   
   Me.txt_Longe_OD_1ª.SetFocus
   
Else

   cmb_CodConsulta.Visible = True
   txt_MedicoConsulta.Visible = True
   txt_DtConsulta.Visible = True
   
 
End If

End Sub

Na cmb_Exame, qual é a linha da origem de dados? É uma lista de valores? Quantas colunas tem?

Nesta combo tenho uma lista de dois nomes: "Cliente" e "Loja"

Boa noite.

Julgo que tem duas colunas, portanto.

tente indicar a que coluna se refere
If cmb_Exame.column(X) = "Cliente" Then
Sendo X a coluna que contém o "Cliente"

Para colocar a data em branco, jugo que tem de indicar Null em vez de ""