ORDEN ALFABETICA

WEBMASTER 25/03/2005 11:22:13
#74874 Resposta escolhida

Vê se isso resolve,

em vez de:
data1.recordcource = "tb_forma_pgto"

faça isso :
data1.RecordSource = "select * from tb_forma_pgto order by nm_forma_pgto"


Se você for definir esta propriedade dentro do código do vb, utiliza "data1.refresh" após o comando.

Citação:

data1.RecordSource = "select * from tb_forma_pgto order by nm_forma_pgto"
data1.refresh

PAULOHSV 25/03/2005 11:23:25
#74875

Ou

use o evento HeadClic do datagrid

private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)
ado.Sort = DataGrid1.Columns(ColIndex).DataField & IIf(Ordem, " ASC", " DESC")
Ordem = Not Ordem
End Sub

FORMIGINHA 25/03/2005 11:33:20
#74877

Leopoldo Antunes da Rocha Júnior

em q lugar eu escrevo esse codigo?

WEBMASTER 25/03/2005 11:53:25
#74881

Formiga,

Você sabe que o BDGRID não funciona sozinho, ele precisa de um componente "DATA".
Aquela instrução que eu te passei, você pode coloca dentro da propriedade "RECORDSOURCE" do objeto DATA ,em modo de desenho do formulário.

select * from tb_forma_pgto order by nm_forma_pgto

Se isso resolver o seu problema, aí sim te passo aonde se põe o código