Añadir mediante código a todos los DropDownList de la aplicación

[beamm]

Muxas gracias Peter, para el que necesite pongo komo keda al final ( con otra situación, que en mi aplicación lo uso bastante x eso tenia donde elegir, jejje)

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim strconexion As String
Dim objconexion As OleDbConnection
Dim objcomando As OleDbDataAdapter
Dim objds As New DataSet
Dim Num As New DataTable("Num")
strconexion = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Documents and Settings\Bea.BEA-095B12391FA\Mis documentos\Visual Studio 2005\WebSites\GestionAulas\App_Data\gestionaulas.m db"

objconexion = New OleDbConnection(strconexion)
objconexion.Open()
objcomando = New OleDbDataAdapter("select * from Aula", objconexion)
objcomando.Fill(objds, "Num")
Dim fila As DataRow
For Each fila In objds.Tables("Num").Rows
DropDownList1.Items.Add(fila(0))

Next
objconexion.Close()

End Sub