VB 6.0 ajudinha xD

[vitao1718]

amigos pra que que server isso

Chr$(39)

nesse codigo

Dim SQL As String
Dim criterio As String
criterio = Chr$(39) & Text1.Text & "*" & Chr(39)
SQL = "SELECT Nome FROM TB_Cliente WHERE nome LIKE " & criterio
dta_clientes_cli.RecordSource = SQL
dta_clientes_cli.Refresh

peguei na net esse tuto mais o meu prof vai perguntar o que e isso, e so funciona com isso ae , nao sei pq me ajudem ae pls

abraço

 

[GiLL_ClinTon]

Returns a string containing the character associated with the specified character code.

Basicamente ele retorna o caracter relativo ao código ascii que você especificou.
O 39 refere à aspas simples, '
Daria à mesma coisa se você colocasse criterio = "'" & Text1.Text & "*'"

Agora o porque de usar aspas, é porque em SQL quando vai comparar ou atribuir uma string, utiliza essas aspas simples

Quando você tiver dúvida de comandos, é só olhar no Object Browser

 

[vitao1718]

AE MANO VLW MESMO BRIGADAO AGORA SIM ELE VAI BABAR xD

 

[vitao1718]

poxa to com outro problema no data que tenho
na hora da movimentaçao por botoes tipo :

dta.racordsource.movenext

como faz pra ele nao ir para o BOF ou EOF???
pq so sei fazer ele nao tentar passar dos 2 mais nao ir para eles eu nao sei

 

[ajrcd]

dta.racordsource.movefirst vai para bof
dta.racordsource.movelast vai para eof