VB 6.0 ajudinha xD

vitao1718

Member
Registrado
amigos pra que que server isso


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

Klaatu, Barada, Nikto
Registrado
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 :D

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

imagemyi2.jpg
 

vitao1718

Member
Registrado
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

New Member
Registrado
dta.racordsource.movefirst vai para bof
dta.racordsource.movelast vai para eof
 

Usuários que está vendo este tópico

Topo