Hola
Usa un data set que puede leer un xml, y luego se lo asignas a tu listbox, suponiendo que tenes un xml como este:
<?xml version="1.0" encoding="utf-8" ?>
<personaS>
<persona>
<id>22</id>
<nombre>analia</nombre>
</persona>
<persona>
<id>234</id>
<nombre>maria</nombre>
</persona>
</personaS>
el codigo sería:
Dim xds As New DataSet()
xds.ReadXml("XMLFile1.xml")
listBox1.DataSource = xds.Tables(0)
listBox1.DisplayMember = "nombre"
listBox1.ValueMember = "id"