como puedo llenar un combobox con dos consultas sql distintas?

[alfre2x]

si!!
muchas gracias mdavila por la respuesta
ocupe la segunda alternativa
llene el dropdownlist o combobox con dos for y con una tabla auxiliar y una grilla auxiliar y me reslto este es el codigo q desarrolle por si a alguien le sirve.

Código:

Dim grilla_aux As DataGrid
Dim grilla_aux2 As DataGrid
Dim contador As Integer
Dim contador2 As Integer
Dim i As Integer
Dim a As Integer
Dim tabla_aux As Data.DataTable
Dim fila_aux As Data.DataRow

  grilla_aux = New DataGrid
  grilla_aux2 = New DataGrid

  grilla_aux.DataSource = lista_clientes() 'funcion1 donde se encuentra la consulta
  grilla_aux.DataBind()

   grilla_aux2.DataSource = lista_clientes2() 'funcion2 donde se encuentra la consulta
   
grilla_aux2.DataBind()

            tabla_aux = New Data.DataTable
            tabla_aux.Columns.Add("id_cliente")
            tabla_aux.Columns.Add("descripcion_empresa")


            contador = grilla_aux.Items.Count
            contador2 = grilla_aux2.Items.Count

           If contador > 0 And contador2 > 0 Then

   For i = 0 To grilla_aux.Items.Count - 1

  fila_aux = tabla_aux.NewRow

fila_aux(0) = grilla_aux.Items(i).Cells(1).Text
fila_aux(1) = grilla_aux.Items(i).Cells(1).Text
tabla_aux.Rows.Add(fila_aux)

 Next

For a = 0 To grilla_aux2.Items.Count - 1

fila_aux = tabla_aux.NewRow

fila_aux(0) = grilla_aux2.Items(a).Cells(1).Text
fila_aux(1) = grilla_aux2.Items(a).Cells(1).Text

  tabla_aux.Rows.Add(fila_aux)


  Next

            End If

cmb_cliente.DataTextField = "descripcion_empresa"
cmb_cliente.DataValueField = "id_cliente"
cmb_cliente.DataSource = New Data.DataView(tabla_aux)                           
cmb_cliente.DataBind()

gracias!!!!
ojala les sirva