Criando XML CFe

Pessoal boa tarde. Estou tentado criar o XML para o cupom fiscal eletronico de SP, porém estou encontrando algumas dificuldades.

consegui fazer o código abaixo:

Dim writer As New XmlTextWriter("C:\XML CAIXA\" & txtNumBoleta.Text & "_" & Replace(RetornaUmCampo("sp_RetornaDataHora"), "/", "").Replace(":", "") & ".xml", Nothing)

Try
writer.WriteStartDocument()
writer.WriteStartElement("CFe")
writer.WriteElementString("infCFe versaoDadosEnt='0.06'", "")

writer.WriteStartElement("ide", "")
writer.WriteElementString("CNPJ", "11111111111111111")
writer.WriteElementString("signAC", "empresa")
writer.WriteElementString("numeroCaixa", "1")
writer.WriteEndElement()

writer.WriteStartElement("emit", "")
writer.WriteElementString("CNPJ", "11111111111111")
writer.WriteElementString("IE", "123123")
writer.WriteElementString("indRatISSQN", "N")
writer.WriteEndElement()

writer.WriteStartElement("dest", "")
writer.WriteEndElement()
'até aqui ok

'writer.WriteElementString("det nItem", "1")

'writer.WriteEndElement()

'fim ok
'writer.WriteEndElement() 'cfe
writer.WriteEndElement() 'infcfe
writer.WriteEndDocument() 'doc
writer.Close()
Catch ex As Exception
Finally
MsgBox("XML gerado!", MsgBoxStyle.Exclamation)
End Try

Que me retorna o seguinte resultado:

<?xml version="1.0"?>

-<CFe>

<infCFe versaoDadosEnt="0.06"/>

-<ide>

<CNPJ>111111111111</CNPJ>

<signAC>empresa</signAC>

<numeroCaixa>1</numeroCaixa>

</ide>

-<emit>

<CNPJ>11111111111111</CNPJ>

<IE>123123</IE>

<indRatISSQN>N</indRatISSQN>

</emit>

<dest/>

</CFe>

Porém não estou coneguindo prosseguir com todos os elemnetos, a partir dai quando tento inserir mais elementos o xml da erro.

pois quero montar um xml identico a esse:

<?xml version="1.0" encoding="UTF-8"?>

-<CFe>

-<infCFe versaoDadosEnt="0.06">

-<ide>

<CNPJ>16716114000172</CNPJ>

<signAC>SGR-SAT SISTEMA DE GESTAO E RETAGUARDA DO SAT</signAC>

<numeroCaixa>123</numeroCaixa>

</ide>

-<emit>

<CNPJ>61099008000141</CNPJ>

<IE>111111111111</IE>

<IM>123123</IM>

<indRatISSQN>N</indRatISSQN>

</emit>

<dest/>

-<det nItem="1">

-<prod>

<cProd>0023</cProd>

<xProd>Trib ICMS Com Ant por ST - PIS e COFINS ST aliquota 0.0250</xProd>

<NCM>61124100</NCM>

<CFOP>5023</CFOP>

<uCom>kg</uCom>

<qCom>1.0000</qCom>

<vUnCom>60.00</vUnCom>

<indRegra>A</indRegra>

</prod>

-<imposto>

-<ICMS>

-<ICMS40>

<Orig>5</Orig>

<CST>60</CST>

</ICMS40>

</ICMS>

-<PIS>

-<PISAliq>

<CST>02</CST>

<vBC>60.00</vBC>

<pPIS>0.0250</pPIS>

</PISAliq>

</PIS>

-<PISST>

<vBC>60.00</vBC>

<pPIS>0.0250</pPIS>

</PISST>

-<COFINS>

-<COFINSAliq>

<CST>02</CST>

<vBC>60.00</vBC>

<pCOFINS>0.0250</pCOFINS>

</COFINSAliq>

</COFINS>

-<COFINSST>

<vBC>60.00</vBC>

<pCOFINS>0.0250</pCOFINS>

</COFINSST>

</imposto>

</det>

<total/>

-<pgto>

-<MP>

<cMP>01</cMP>

<vMP>60.00</vMP>

</MP>

</pgto>

</infCFe>

</CFe>

Onde está meu erro, ja pesquisei em alguns lugares montagens e geração de XML mas não achei onde possa estar errando.

Da tag <prod> para baixo não consigo montar da erro no XML.