Conexao ao BD Sql Server

[mestre fyoda 1]

nao sei nada , alguem poderia me passar codigo facil para se conectar ao bd sql server por favor .Qual componente devo usar para ter acesso ao banco de dados ?Grato pela atenção .

[mestre fyoda 1]

para aqueles q qerem mexer no sql com vb ai vai , consegui fazer os esquemas .

Global cn As ADODB.ConnectionGlobal rs As ADODB.RecordsetPrivate Sub Main()Dim strArquivo As StringDim strLocal As StringDim Conexao As StringSet cn = New ADODB.ConnectionSet rs = New ADODB.RecordsetSet cn = CreateObject("ADODB.Connection")Conexao = "Driver={SQL Server};" & _"Server=RAFAEL;" & _"Database=Biblioteca;" & _"Uid=sa;Pwd=janio1;"cn.Open ConexaoEnd Sub

depois vai em project -> references -> e abilita o -> Micrisoft ActiveX Data objects 2.6 Library