CONSULTA EM DB
Tenho que fazer uma consulta em um db e esta fazendo perfeitamente acontece que eu queria q estes dados fosse exibido em ordem alfabetica tem como fazer isso se alguem puder me ajudar eu agradeço. veja o codigo que usei
Dim bytNome as Byte
bytNome = Len(txtProcurar.Text)
data1.RecordSource = [Ô]Select * from Tabela where left(Nome,[ô][Ô] & bytNome & [Ô][ô]) = [ô][Ô] & txtProcurar & [Ô][ô][Ô]
data1.Refresh
Dim bytNome as Byte
bytNome = Len(txtProcurar.Text)
data1.RecordSource = [Ô]Select * from Tabela where left(Nome,[ô][Ô] & bytNome & [Ô][ô]) = [ô][Ô] & txtProcurar & [Ô][ô][Ô]
data1.Refresh
data1.RecordSource = [Ô]Select * from Tabela order by campo[Ô]
data1.RecordSource = [Ô]Select * from Tabela where left(Nome,[ô][Ô] & bytNome & [Ô][ô]) = [ô][Ô] & txtProcurar & [Ô][ô][Ô] & [Ô] order by Nome[Ô]
Tópico encerrado , respostas não são mais permitidas