Visual Basic.NET - vb.net 2008 conectarse a una base de datosde sql bajo sin control

conectarse a una base de datos bajo codigo sin control lo puedo hacer con control usando el

bindingsource pero quiero que sea en modo de codigo.

Hola. El código de la conexión es así:

Dim Conexion As String = "Data Source=.\SQLEXPRESS;Initial Catalog=nombreBase;Integrated Security=True"

Dim MiConexion As New SqlConnection(Conexion)
Dim Rs As SqlDataReader
Dim SQL As String
Dim Com, Insert, Actualizar As New SqlCommand

Después para hacer un consulta:

SQL = "select codemp from Empleados E,Grupos G where E.CodGrupo=G.CodGrupo and G.Descripcion=" _
& "'Administrador'"

Com = New SqlCommand(SQL, MiConexion)
Rs = Com.ExecuteReader()

If Rs.HasRows Then
Rs.Read()
cboVend.Items.Add("Administrador")
Microsoft.VisualBasic.Compatibility.VB6.SetItemData(cboVend, cboVend.Items.Count - 1, Rs("CodEmp"))
End If
cboVend.Items.Add("Nuevo Vendedor")
Rs.Close()


Para hacer un update:

Actualizar.CommandText = "Update Empresa set..."

Actualizar.Connection = MiConexion
Actualizar.ExecuteNonQuery()

Bueno espero, se entienda. Saludos.