Visual Basic.NET - ayuda sobre listbox

tengo este codigo en visual
Dim con1 As SqlConnection
Dim comando As SqlCommand
Dim p1, p2 As SqlParameter
Dim cad As String
con1 = New SqlConnection
con1.ConnectionString = ("integrated security=SSPI;server=(local);database=inventario")
con1.Open()
comando = New SqlCommand
comando.Connection = con1
comando.CommandType = CommandType.StoredProcedure
cad = "exec todo_cpu3" & ListBox1.Text & ""
comando.CommandText = "todo_cpu3"

p1 = comando.Parameters.Add("@a", SqlDbType.VarChar, 100)

p2 = comando.Parameters.Add("@z", SqlDbType.VarChar, 100)

p1.Direction = ParameterDirection.Input
p2.Direction = ParameterDirection.Output

p1.Value = ListBox1.Text

comando.ExecuteNonQuery()
ComboBox1.Text = p2.Value

con1.Close()

y realizo un procedimiento en sql server asi

create procedure todo_cpu3
@a varchar (100),
@z varchar(100) output
as
if exists( select * from cpu where inventario=@a)
begin
select @z=descripcion
from cpu,componente,tamaño_elemento
where inventario=@a and componente.clave_cpu=cpu.clave_cpu and clave_componente=clave_tipo_h_s_carac_tam
end
else
begin
select @z='no tiene componentes'
end
go

y anteriorrmente asigme los inventarios al listbox1
y al seleccionar un inventario en el listbox me aparece en el combobox
eso si me sale.
mi problema es que si un inventario tiene mas de un componente
no me muestra todos los componentes de ese inventario
como le prodria hacer

si pruebas a utilizar las clausulas de union en tu SP ?
LEFT JOIN, INNER JOIN, RIGHT JOIN...