SQL - QUAL O ERRO?
Qual o Erro? alguém pode me ajudar?
Private Sub Command2_Click()
Dim Benefic As String
Dim VerSacado As String
VerSacado = Text1.Text 'Text1 recebe o Nome do Sacado
Benefic = "Select * From cBoletos Where Sacado=VerSacado"
Data1.RecordSource = Benefic
Data1.Refresh
LBcrRelBoletos.Show
Hide
Text1 = ""
End Sub
Mensagem - Parà ¢metros unsuficientes, era esperado 1
Private Sub Command2_Click()
Dim Benefic As String
Dim VerSacado As String
VerSacado = Text1.Text 'Text1 recebe o Nome do Sacado
Benefic = "Select * From cBoletos Where Sacado=VerSacado"
Data1.RecordSource = Benefic
Data1.Refresh
LBcrRelBoletos.Show
Hide
Text1 = ""
End Sub
Mensagem - Parà ¢metros unsuficientes, era esperado 1
Benefic= "Select * From cBolletos Where Sacado='" & VerSAcado & "'"
Não deu erro, mas não atualizou o Relatório, vopu tentar, grato,
Tópico encerrado , respostas não são mais permitidas