Aqui te muestro el codigo con que lleno uno de los dos dropdownlist Dim
myconnection As SqlConnection
Dim myda As SqlDataAdapter
Dim ds As DataSet
myconnection = New SqlConnection("data source=desarrollo;initial catalog=dbmayorista;persist security info=False;user id=web;password=makmv540")
myda = New SqlDataAdapter("Select * from cata_perfiles where ID_perfil = " & compara & " ", myconnection)
ds = New DataSet
myda.Fill(ds)
perf_usu.DataSource = ds
perf_usu.DataBind()
myconnection.Close()
donde perf_usu es el dropdown list
y esta parte es con la que le digo al dropdownlist donde se posesione al principio
perf_usu.SelectedIndex = situa_perfil() - 1
Como te cometaba esto funciona bien pero solo funciona para uno de los dos dropdownlist a la vez y no lo hace con los dos no se por que espero puedas ayudarme te lo agradeceria.