Brother´s, olha essa ai. Eu quero gravar os dados de meu pedido que contem dados do cliente e dados dos produtos para esse cliente. Será que vai dar certo assim. Private Sub CmdGravar_Click() TBPedidos.AddNew TBPedidos("CodPedido") = TxtCodPedido TBPedidos("NomeCliente") = TxtNomeCliente TBPedidos("CPF") = TxtCPF TBPedidos("Endereco") = TxtEndereco TBPedidos("Complemento") = TxtComplemento TBPedidos("Bairro") = TxtBairro TBPedidos("Cidade") = TxtCidade TBPedidos("CEP") = TxtCEP TBPedidos("Telefone") = TxtTelefone TBPedidos("CodProduto") = Msflexgrid1.textMatrix(1,0) TBPedidos("Classe") = Msflexgrid1.textMatrix(1,1) TBPedidos("Medida") = Msflexgrid1.textMatrix(1,2) TBPedidos("PrecoVenda") = Msflexgrid1.textMatrix(1,3) TBPedidos("Quantidade") = Msflexgrid1.textMatrix(1,4) TBPedidos("Total") = Msflexgrid1.textMatrix(1,5) TBPedidos.Update Esse procedimento é legal no VB6.00, amigos do scriptbrasil. George Ferraz B)