Basicamente, se está fazendo errado, uma solução exemplo simples é assim:
Implicito:
Dim SQL As String
Dim Dados As New DataTable
SQL = "SELECT * From Diaria where data=@data and prefixo=@prefixo"
Using db = New SqlConnection("")
Using command = New SqlCommand(SQL, db)
command.Parameters.AddWithValue("@data", New DateTime())
command.Parameters.AddWithValue("@prefixo", "texto")
Dados.Load(command.ExecuteReader())
End Using
End Using
onde Dados é DataTable com as informações, mas, isso só foi mesmo para exemplifica. O problema do seu código é por possuir parâmetros onde você estava passando errado e podendo ocasionar problemas de conversão, problemas de segurança e a arquitetura .NET já faz o papel pesado para você com o auxilio dos Parameters como exemplificado nessa resposta, no lugar de New DateTime()
passe uma variável do tipo com o valor de pesquisa e assim serve para todos os outros Parameters, sempre passe o tipo de dado com o valor referente.
Foi feito um exemplo pequeno mas, que abrangem a troca de um dado não tratado com o do Parameters, evitando muitos problemas principalmente de conversão e tratando um código mais esperado pela arquitetura.
Você também pode especificar o tipo de dado enviado, exemplo:
command.Parameters.Add("@data", SqlDbType.Date).Value = New DateTime()
isso é um código mais usual:
Explicito:
Dim SQL As String
Dim Dados As New DataTable
SQL = "SELECT * From Diaria where data=@data and prefixo=@prefixo"
Using db = New SqlConnection("")
Using command = New SqlCommand(SQL, db)
command.Parameters.Add("@data", SqlDbType.Date).Value = New DateTime()
command.Parameters.Add("@prefixo", SqlDbType.NChar, 6).Value = "123456"
Dados.Load(command.ExecuteReader())
End Using
End Using
Referencias
Exemplos:
data
é qual tipo de campo no seu Banco de dados? eprefixo
qual é o tipo de campo no seu Banco de Dados? (Observação: além de fazer errado está usando uma proposta errada também, esqueça VB 6 e tente focar em VB.Net coisas se assemelham mas, a parte de banco por exemplo é totalmente diferente)