Datas no VB

Question

Quero exibir os meses do ano por extenso numa ComboxBox e depois usar o mes escolhido para fazer uma sele&ccedil;&atilde;o em SQL. 
Tem como usar um loop para preencher os meses por extenso numa combo? Eu tentei tirar o mes da seguinte maneira:

Format(Month(DATA), Medium Date) 

mas n&atilde;o deu certo.

Gostaria de usar alguma fun&ccedil;&atilde;o interna do VB que facilite essa tarefa.  

Obrigado

Answer

[quote=Cassio Alves]Quero exibir os meses do ano por extenso numa ComboxBox e depois usar o mes escolhido para fazer uma sele&ccedil;&atilde;o em SQL. ...[/quote]

Bom eu nao entendi bem o que vc quer, mas se &eacute; o que estou pensando vc quer exibir tipo: 22/nov/2002. se for isso tente:

dim data as date
dim i as integer
dim tabela as recordset

' supondo que o seu recordset ja esteja aberto e no primeiro registro

for i = 1 to tabela.recordcount
      combo.add(format(tabela(data),dd/mmm/yyyy)
      tabela.movenext
next

se nao for isso seja mais especifico....

Answer

Voc&ecirc; pode pegar o nome abreviado com a constante mmm e o nome completo com mmmm. Tipo:

Format(Date(), mmmm)

Hoje ela retornaria novembro se seu Windows est&aacute; em portugu&ecirc;s.

Answer

Na propia query vc pode fazer isso n&atilde;o me lembro como procurei aqui no help do SQL Server mais n&atilde;o achei mais sei que da!

Ferramentas

Mover Tópico