Access função BackColor em caixa de texto do Access

[Ronaldo Bonanato]

Preciso de uma ajuda para executar o comando BackColor  para pintar caixa de texto, porém ele funciona se passo na função o nome da caixa de texto (Me.vaga001.BackColor = vbRed), porém precisava pegar esse nome vaga001 de uma outra caixa de texto  ou de uma variável criada no código vba e executar o comando.

 

Como faço

 

'Dessa forma não funciona

vg = "vaga001"

Me.vg.BackColor = vbWhite

 

 

'Dessa forma funciona

Me.vaga001.BackColor = vbRed

 

Agradeço muito quem puder me ajudar.

[Muca Costa]

Veja se é isso:

 

Considerando que a caixa de texto é vg:

If Me.vg = "vaga001" Then
	Me.vaga001.BackColor = vbRed
Else
	Me.vaga001.BackColor = vbWhite 
End If

 

[Ronaldo Bonanato]

@Muca Costa olá Muca, agradeço pelo post, mas meu código eu comecei exatamente com if else, mas são 400 if else por isso queria que o código de alguma forma aceitasse guardar dentro de uma variável e depois executar essa variável . Pois se a vaga for 400 ele irá tratar os 400 if até chegar no correto, e isso irá perder alguns segundos de pesquisa para o cliente quando clicar em pesquisar

 

obrigado.

 

 

agora, Ronaldo Bonanato disse:

@Muca Costa olá Muca, agradeço pelo post, mas meu código eu comecei exatamente com if else, mas são 400 if else por isso queria que o código de alguma forma aceitasse guardar dentro de uma variável e depois executar essa variável . Pois se a vaga for 400 ele irá tratar os 400 if até chegar no correto, e isso irá perder alguns segundos de pesquisa para o cliente quando clicar em pesquisar

 

obrigado.

 

 

Se desse para tipo criar dessa forma, porém não sei se existe comando para isso

 

vamos supor que a caixa de texto chama vg.

 

tenho uma variável chamada strcodigo

E ai ficaria assim

passo o comando para variável.

 

atrcodigo = “me.&vg&.BackColor = vbWhite”

depois com alguma função executo ela 

 

executar.artcodigo

[Muca Costa]

Se puder anexar um exemplo do seu projeto, seria melhor para ajuda-lo...