[Resolvido]Cor de fonte (código)

Boa tarde pessoal, estou com uma dúvida e não estou achando o que eu quero aqui no fórum, Estou fazendo um menu e ao passar o mouse por cima de cada botão a ideia seria trocar a cor da letra para identificar o cursor onde está, alguém sabe como eu troco a cor da fonte, na verdade eu não sei como achar o código da fonte especifica, estou usando o seguinte código:

Código:


Me.Campo.ForeColor = vbGreen (exemplo)

Mas na verdade estou a procura de um tom de verde especifico, eu já vi um exemplo não lembro a onde se foi aqui, mas não achei novamente de usar o mesmo código esse porém com uma numeração tipo 0, 1 , 2 algo assim.. mas não sei se alguém poder me ajudar.. precisaria na verdade descobrir (como se faz) o código da cor especifica essa que estou querendo da paleta de cores, onde no texto normal eu posso selecionar essa cor mas como vi que usando o códgo "vb(cor)" só tem cores especificas se alguém poder me ajudar agradeço.


Abraço a todos !

Mau caro, afine a cor através da palete de cores. Coloque a cor numa txt ou lbl e veja o nº da cor na aba "Formato" cor de fundo.

Hmmm pois é não tinha pensando nisso... na verdade havia olhado o código com letras mas não funcionou .. ai joguei no google pego no caso pelo RGB no caso ? Tipo rgb(255, 229, 0) que ficaria o código Me.Campo.ForeColor = 2552290 isso ?


Abraço

Me.Campo.ForeColor = RGB(255.229.0)

Oi Leonardo!

Coloca num modulo:

Código:

Function TrocaCor(Campo As Control, Estado As Single)
   If Estado = 0 Then
       Campo.ForeColor = RGB(221, 224, 227)
   Else
       Campo.ForeColor = RGB(0, 114, 188)
   End If
End Function

No form é usado assim: Call TrocaCor([NomeCampo], 0) ou Call TrocaCor([NomeCampo], 1)

Saludos desde Bolivia

Olá a todos;

Você não necessita de tanta coisa para fazer o que pretende, o Ms Access já facilita tudo isso;

Veja como manipular;

Selecione todos os botões ao mesmo tempo, vá a propriedades e formato;

Muito Obrigado a todos, porém na verdade o que faltava para poder acertar a cor era colocar o RGB e a cor separada por virgula como exemplo Me.Campo.ForeColor = RGB (00,00,00).  Estava colocando somente assim Me.Campo.ForeColor = 000000 (mudava a cor mas nunca dava certo na cor que eu estava procurando hehehe).

Porém é claro JPaulo matou de novo hahaha e eu quebrando a cabeça com algo simples mesmo no Format.. nada como ter o conhecimento eheheh

Obrigado mais uma vez !!!

Esqueci de marcar como resolvido hehehe ! Abraço a todo !

Fico feliz.

Obrigado pelo retorno o forum agradece.