Erro no código de Agenda

Olá bom dia,

Estou tentando fazer uma agenda em vb.net mais não estou conseguindo colocar as informações no banco SQL Server...

Quando executo aparece a seguinte informação

ExecuteNonQuery: Connection property has not been initialized.

Olhem meu código.

Private Sub salvar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles salvar.Click

 Dim insert = "insert into Cliente (Cli_nome, Cli_endereco, Cli_telefone, Cli_bairro, Cli_cidade, Cli_cpf, Cli_complemento) values ("

 Dim campos = "'" & name2.Text & "','" & endereco2.Text & "','" & telefone2.Text & "','" & bairro2.Text & "','" & cidade2.Text & "','" & cpf2.Text & "','" & complemento2.Text & "')"

 

 Dim comando = insert & campos

 

 

 Dim conexao As SqlConnection

 conexao = New SqlConnection("Data Source=;Initial Catalog=xxxxxx Thais;User ID=xxxx;Password=xxxx;MultipleActiveResultSets=True;")

 

 Dim sql As New SqlCommand

 sql.CommandText = comando

 conexao.Open()

 

 Dim linhas = sql.ExecuteNonQuery()

 conexao.Close()

 

 

 End Sub

 

 Por favor alguem poderia me dar um exemplo com meu código?