Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
oi alguem pode verificar se esse código está certo? pois está dando erro que estah errado no "="
sql = "select * from BD_Cad_Forn where Contato1 =" _ & "(select Contato1 from BD_Cad_Forn" _ & "where Nome_da_Empresa = '" & DataCombo1.Text & "')"
Verifique qual o conteúdo do: DataCombo1.Text Provavelmente não deve conter nenhum valor.Obs: Sugeria a você não utilizar nomes em cláusulas where, sua consulta fica muito lenta e pode ocorre inconsistência em seus dados supondo que existam duas empresas com o mesmo nome.