Ce Salles

Sou iniciante em vb.net e.... Fiz um programa em visual studio 2008 com Sql Express Precisava fazer uma tabela onde o cliente pudesse selecionar um campo de uma tabela e salvasse em outra tabela. Fiz isso com o checkBoxList. Agora preciso fazer o mesmo mas em um DataGridView, e não faço a menor ideia de como posso fazer isso. Para o ChecklistBox usei o seguinte comando.... Private Sub carregaCandidatos() Dim cmd As OleDbCommand Dim sql As String sql = "select * from candidato where 1 = 1 " If ComboBoxIdade7.Text.Trim.Length > 0 Then sql &= "and Idade = " & ComboBoxIdade7.Text End If (‘esse coloquei em varios combos) cmd = New OleDbCommand cmd.Connection = con cmd.CommandType = CommandType.Text cmd.CommandText = sql Dim dr As OleDbDataReader = cmd.ExecuteReader clbCandidatos.Items.Clear() While dr.Read Me.clbCandidatos.Items.Add(dr("CodigoCandidato") & " - " & dr("NomeDoCandidato") & " - " & dr("TelefoneCelular") & " - " & dr("TelefoneComercial") & " - " & dr("TelefoneResidencial1") & " " & dr("TelefoneResidencial2") & " - " & dr("disponivel")) End While End Sub Private Sub btnSalvar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSalvar.Click Dim indx As CheckedListBox.CheckedItemCollection Dim cmd As OleDbCommand Dim cmdA As OleDbCommand Dim sql As String indx = clbCandidatos.CheckedItems For i As Integer = 0 To indx.Count - 1 Dim arrCodigo As String() = indx(i).ToString.Split(" - ") sql = "INSERT INTO CandidatoCampanhaCC " sql &= "(CodigoCandidato, CodigoCampanha) " sql &= "Values " sql &= "(" & arrCodigo(0) & ", " & ComboBox3.SelectedValue & ") " cmd = New OleDbCommand cmd.Connection = con cmd.CommandType = CommandType.Text cmd.CommandText = sql cmd.ExecuteNonQuery() cmd = Nothing sql = "UPDATE Candidato set " sql &= "disponivel = 'Não' " sql &= " where codigocandidato = " & arrCodigo(0) cmdA = New OleDbCommand cmdA.Connection = con cmdA.CommandType = CommandType.Text cmdA.CommandText = sql cmdA.ExecuteNonQuery() cmdA = Nothing MsgBox("Salvo com Sucesso!!!") Next End Sub Private Sub ComboBoxEstCivil9_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBoxEstCivil9.SelectedIndexChanged carregaCandidatos() End Sub (‘esse coloquei em varios combos) End Class Não faço nem ideia por onde começar Se alguém puder me ajudar, agradeceria muito.