NÃO CARREGA PESQUISA
qnd for o mês todo, com pouco código vc obtem o primeiro dia de cada mês e o ultimo....
vc pode formular de diversas formas, vc teria uma function q recebe 2 parâmetros, a data inicial e a final...public function entredatas(byval inicio as date, byval fim as date) as dataset
select * from tabela where data between inicio and fim
bem precário, seria quase isso...
dos forms de pesquisa q vc passa essa data inicio e fim....
se for do primeiro ao ultimo dia do mês, como eu disse com algumas linhas vc informa o mês, e essas poucas linhas te retornar o primeiro e ultimo dia q devem então ser enviados a função....disse de usar uma única função, pq vc aproveita apenas essa função pra qq intervalo, seja 1 dia, ou 1 ano, 1 século....basta passar o inicio e o fim...
Citação:
Public Class Form1
Dim A, B As Integer
Dim C As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
A = 1
B = 31
End Sub
Public Function entredatas(ByVal inicio As Date, ByVal fim As Date) As DataSet
C = [Ô]select * from tabela where data between[Ô] & inicio & [Ô]and[Ô] & fim
Return C
End Function
Private Sub btnPesquisa_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPesquisa.Click
If RadioButtonPesqMes.Checked = True Then
Dim MesInicio, MesFim As Date
MesInicio = A & [Ô]/[Ô] & txtMes.Text
MesFim = B & [Ô]/[Ô] & txtMes.Text
entredatas(MesInicio, MesFim)
End If
End Sub
End Class
Criei esse exemplo meio por cima, mais para entender a pesquisa por mês inteiro, caso seja por periodo, só colocar um elseif para a RadioButton por periodo e pegar a data pela txtDataInicio e txtDataFinal.
na verdade o primeiro e ultimo dia do mês prefiro obter por código fica mais garantido, nem todos sabem os meses de 30 e 31 e temos fevereiro com 28 e 29 dias, pode ser conferido tudo isso.....
na verdade o código é mais pro ultimo dia, o primeiro dia do mês até então sera sempre 01/alguma coisa....
qnd precisei algo assim, usei um combo com os nomes dos meses (por código vinha o primeiro e ultimo), qnd precisa passar data qualquer uso datetimepicker super tranquilo...