Imports System.Data.SqlClient
Dim conexion As New SqlConnection
Dim comando As New SqlCommand
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
conexion.ConnectionString = "Data Source=PC-19\SQLEXPRESS;Initial Catalog=Clientes;Persist Security Info=True;User ID=sa; Password=123456789"
conexion.Open()
comando.Connection = conexion
End Sub
boton guardar aqui
comando.CommandText = ""INSERT INTO Clintes(nombre,apellido,atividades)VALUES ('" & TextBox1.Text & "', '" & TextBox2.Text & "', '" & TextBox3.Text & "')"
end boton