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

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.