MOSTRAR SO VALORES DE TAL MES ESCOLHIDO

RICKSOUSA 09/06/2012 13:10:40
#403826

Boa tarde!

ex.

eu quero mostrar somente as consultas de tal mes escolhido, caso eu escolher eu escolher mes de MAIO mostrar as consultas gravadas do dia 01/05/2012 a 31/05/2012, se for mes de Junho mostrar 01/06/2012.

quando eu clico na data do calendario mostra a consulta do dia que foi cadastrado.

o codigo esta assim para a consulta do dia escolhido:


[txt-color=#0000f0]Private Sub MonthView1_DateClick(ByVal DateClicked As Date)

Conecta True

Dim SQL As String
Dim AppDate
Dim icol As Integer

Set rsConsultas = New ADODB.Recordset
SQL = [Ô]SELECT * From Financa WHERE Data =#[Ô] & SQLData(DateClicked) & [Ô]#[Ô] & [Ô] ORDER BY Data[Ô] & [Ô];[Ô] [txt-color=#007100][ô]aqui pega a data do dia escolhido e mostra por ordem de data somente deste dia escolhido[/txt-color]

Set rsConsultas = Conexao.Execute(SQL)

With MSFlexGrid1 [ô] mostra os dados no flexgrid
.Rows = 1
.Cols = rsConsultas.Fields.Count
For icol = 0 To rsConsultas.Fields.Count - 1
.Col = icol
.Text = rsConsultas.Fields(icol).Name
Next

While Not rsConsultas.EOF [ô] preenche o grid com os dados do recordset
.Rows = .Rows + 1
.Row = .Rows - 1

For icol = 0 To rsConsultas.Fields.Count - 1
.Col = icol
.Text = rsConsultas(icol) & [Ô][Ô]
Next
rsConsultas.MoveNext
Wend
.TextMatrix(0, 0) = [Ô]codigo[Ô]
.TextMatrix(0, 1) = [Ô]Membro[Ô]
.TextMatrix(0, 2) = [Ô]Referente[Ô]
.TextMatrix(0, 3) = [Ô]valorO[Ô]
.TextMatrix(0, 4) = [Ô]valorD[Ô]
.TextMatrix(0, 5) = [Ô]valorV[Ô]
[ô].FixedRows = 1
[ô].RowHeight(0) = .RowHeight(1) * 1.5

End With

AjustaColunas MSFlexGrid1
Titulo.Caption = [Ô]Consultas para [Ô] & DateClicked

rsConsultas.Close
Set rsConsultas = Nothing

Conecta False

End Sub
[/txt-color]

eu gostaria de saber como faço para mostrar a do mes total,

eu criei um botão tbm para mostrar das as consultas ai ele pega de todos os mes que foi cadastrado, desde a primeira data que foi inserida até a ultima ex:

06/04/2012 a 07/06/2012 ai então ira mostrar registro do mes de abril, mes de maio e mes de junho, e eu queria saber como faço para mostrar somente todos os registros do mes escolhido, eu criei um combo com os meses de (Janeiro a Dezembro, e coloquei tbm Todos) para quando eu quiser que mostre todos os registros ira mostrar todos,

espero que tenham entendido o jeito que eu expliquei .