[Resolvido] Como formatar o cabeçalho do MSFlexGrid/MSHFlexGrid ?

[fagnerx21 0]

Olá a todos,eu estou tentando formatar o cabeçalho do grid para assim mostrar ao usuário ao que corresponde cada coluna,por exemplo,a primeira coluna vai mostrar o nome dos clientes e o usuário precisa saber disso por isso preciso formatar o cabeçalho com as strings correspondentes,olhem meu código:

 

Private Sub Form_Load()
	'Abre a conexão
	cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Adm\Meus documentos\PROJETOS\VB\CONTROLE.mdb;"
	'Define as instruções sql
	sqlcli = "SELECT * FROM Clientes"
	sqlprod = "SELECT * FROM Produtos"
	'Abre os recordsets
	rscli.Open sqlcli, cn, adOpenForwardOnly, adLockReadOnly
	rsprod.Open sqlprod, cn, adOpenForwardOnly, adLockReadOnly
	'Preenche os comboboxs
	cmbCliente = rscli(1)
	cmbProduto = rsprod(1)
	'Formata o grid
	With Lista
		//Eu coloquei assim pois preciso colocar cada valor em uma coluna e todos na primeira linha que é fixed
		.ColPosition(0) = .AddItem("Cliente", 0)
		.ColPosition(1) = .AddItem("Produto", 0)
		.ColPosition(2) = .AddItem("Quantidade", 0)
		.ColPosition(3) = .AddItem("Valor", 0)
		.ColPosition(4) = .AddItem("Sub-Total", 0)
		
		.ColWidth(0) = 5000
		.ColWidth(1) = 1000
		.ColWidth(2) = 500
		.ColWidth(3) = 500
		.ColWidth(4) = 500
	End With
End Sub

Se puderem me ajudar ficarei grato.

[lcs_sp 0]

Olá,

 

Se eu entendi bem você quer colocar o nome de cada coluna?

 

msflex.textmatrix(0,coluna)="nome coluna1"

[fagnerx21 0]

Valeu