Visual Basic - como conectar de visual a sql

hola..alguien me puede enviar el codigo para conectarme de visual a sql porfavor..muchas gracias...

dim Conn as New ADODB.Connection
dim sConnectionString as string

Conn.CursorLocation = adUseClient
sConnectionString = "Provider=SQLOLEDB.1" & _
";User ID=" & Usuario & _
";pwd=" & sPassword & _
";Initial Catalog=" & NombreBaseDatos & _
";Server=" & NombreServidorSql

Conn.ConnectionTimeout = 0
Conn.CommandTimeout = 0
Conn.Open sConnectionString

Puedes utilizar el usuario "sa" y sin contraseña.

Una forma muy sencilla de hacer consultas sql desde Visual Basic es con el componente data, ejemplo

Al componente data le tienes que poner en el DataBaseName la ruta de la base de datos, y en ves de ponerle un recorsouse, tu puedes generar lo que tu quieras con codigo

tu puedes tener un componente data1, y en la propiedad tienes ligado a la base de datos: c:\windows\mibd.mdb por ejemplo

en un boton puedes poner:

data1.recorsource= "SELECT * FROM ALUMNOS WHERE NOMBRE ='JUAN'"
data1.refresh

Y TE SELECCIONARA SOLO LOS ALUMNOS QUE TENGAN EL NOMBRE DE JUAN.

Y EL COMPONENTE DATA LO PUEDES LIGAR A UN DBGRID PARA VER LOS RESULTADOS