Visual Basic.NET - Ayuda conectar VB a SQL server

hola

Alguien me puede decir como hago para conectar a una base de datos en SQL server 2005 express estoy programando en VB08, si lo se conectar pero solo por medio de los controles que trae el VB pero yo lo quiero conectar por medio de código, la conexión seria de tipo SQL Server Authentication y la haría en una ventana de login al iniciar mi sistema con el nombre del servidor al que me conecto, mi password y contraseña.

Dim StrConn As SqlClient.SqlConnection
Dim ConexionServidor

ConexionServidor = "Data Source=SERVIDORPRODUCCION;Initial Catalog=MANTENIMIENTO;User ID=CARLOS;Password=PAMELA"

StrConn = New SqlClient.SqlConnection(ConexionServidor)

'////////////////////////////////////////////////////////////////
Dim objCommand As SqlClient.SqlCommand
Dim objDR As SqlClient.SqlDataReader

objCommand = New SqlClient.SqlCommand("Select CodigoMarca, NombreMarca", StrConn)
objCommand.Connection.Open()

objDR = objCommand.ExecuteReader(CommandBehavior.CloseConnection)

objDR.Read()
If objDR.HasRows = True Then
vCodigoMarca = objDR.GetValue(0)
vNombreMarca = objDR.GetString(1)
Else
vCodigoMarca = 0
vNombreMarca = ""
End If
objDR.Close()
objCommand.Connection.Close()
'////////////////////////////////////////////////////////////////

Genial muchas gracias por responder lo probare ahoramismo.