Rotina de Busca de dados não funciona

[Chamuanza]

Bem Aja a todos

Estou com um problema que não sei resolver

Tenho uma aplicação feita por mim p/ meu uso pessoal de despesas e receita caseiras executado em Visual Studio 2015 que funcionava bem.

Depois de desinstalar o Visual Studio 2022 (não me entendia bem com a configuração) eis que a minha aplicação deixou de funcionar bem nas rotinas de busca de dados ( Receitas; Despesas e outras) entre datas

Junto codigo da rotina "Despesas"

Agradeço ajuda se possivel

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

       
        Dim DataInicio As Date = DateTimePicker1.Value
        Dim DataFim As Date = DateTimePicker2.Value



        Dim ConnectionString As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\DespesasCaseiras\DespesasPessoaisFamiliares.mdb;")
      

        Dim Query As String = "SELECT Id,Data,Designacao,Despesa,Categoria,SubCategoria,Familiar FROM DadosActuais Where Data BETWEEN '" & DataInicio & "' AND '" & DataFim & "'AND Categoria Like '" & Trim(TextBox1.Text.ToString) & "%' AND SubCategoria Like '" & Trim(TextBox2.Text.ToString) & "%' AND Familiar Like '" & Trim(TextBox3.Text.ToString) & "%' Order By Id"


        Dim DataAdapter As New OleDbDataAdapter(Query, ConnectionString)
        Dim MyData As New DataSet

        DataAdapter.Fill(MyData, "DadosActuais")

        ' Neste caso utilizei uma datagridview para visualizar os dados
        Me.DataGridView1.DataSource = MyData.Tables("DadosActuais")
        Me.DataGridView1.Refresh()

        'Conta as linhas da Grid e coloca na Label
        Label1.Text = Nothing
        Label1.Text = "Este Filtro encontrou - " & Me.DataGridView1.RowCount - 1 & " Registos"

        Button2.Enabled = True

        'Button1.Enabled = False

        Call ControlaGrid()

        Call SomarColunas()



    End Sub

 

[user]

Deixou de funcionar bem? Como assim?
Dá alguma exception? O que é que funcionava antes e agora não?

[Chamuanza]

Obrigado desde já pela atenção

Se fizer uma busca de 01/01/2024 a 08/10/2024 apresenta apenas 1 Registo, e com outras datas nem registos aparecem

[M6]

Começa por ver a questão do formato das datas.
Se estás a enviar 01/01/2024 e o formato esperado é 01-01-2024 tens ai um problema.
Outro problema é estares a enviar DD/MM/AAAA e o SQL Server estar a interpretar como MM/DD/AAAA.
Aida tens de contar com a formatação que o próprio .Net mete quando convertes de Date para String, que provavelmente é dependente do Regional Settings.

Começa por fazer uma query diretamente no SQL Server e vai trabalhando a partir daí.

[Chamuanza]

RESOLVIDO

O problema estava na formatação de datas, só não percebo como se alterou a situação