Consulta rapida sobre poblar ComboBoxs

[Highlander]

Hola el asunto es que tengo un codigo para poblar un combobox desde una tabla, el cual lo llamo cuando hago el Load del formulario, pero voy usar varios combobox mas.

Mi duda es si deberia crear un dataset para cada combo y cada objeto y variable que uso para problar el combobox, basicamente repetir harto codigo o hay alguna manera mas optima?

EL codigo que uso es:

Código:

'Cargar Datos ComboBox2 Tamaño 

        mSqlServerCe.Conectar()

        'Configuracion ComboBoxSexo

        Dim sql As String = "SELECT CodigoTamaño, Tamaño FROM PacienteTamaño"
        Dim daDatos As New Data.SqlServerCe.SqlCeDataAdapter(sql, conexionSql)

        'Crear el DataSet
        Dim dsDatos As New Data.DataSet

        'Llenar el DataTable
        daDatos.Fill(dsDatos, "PacienteTamaño")
        ComboBox2.DataSource = dsDatos.Tables("PacienteTamaño").DefaultView
        ComboBox2.ValueMember = dsDatos.Tables("PacienteTamaño").Columns(0).ToString
        ComboBox2.DisplayMember = dsDatos.Tables("PacienteTamaño").Columns(1).ToString
        
        mSqlServerCe.Desconectar()

Cualquier idea se agradece.