Bueno pues lo basico:
Proyecto->Referencias marcas Microsoft Active Data Objects 2.xx (depende que versiones tengas)
luego declaras:
Dim cn As New ADODB.Connection
en el load de la forma:
Código:
Cn.ConnectionString = "DRIVER=SQL Server;SERVER=(local);UID=Tu_usuario;PWD=TuPassword;DATABASE=Tu_BD"
y luego en un boton por ejemplo para meter los datos a la BD
Cn.execute "tu sentencia SQL"
Por ejemplo en tu SQL si es un numero y un texto seria asi:
Código:
Cn.execute "insert into tu_tabla values (" & text1.text & ",'" & text2.text & "')"
PD. Hay un subforo de VB