|
ComboBox1.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", FatturaDettaglioBindingSource, "IdFattura", True))
ComboBox1.DataSource = FattureRsBindingSource ComboBox1.DisplayMember = "Nominativo" ComboBox1.ValueMember = "ID" ComboBox1.FormattingEnabled = True ' oppure ComboBox2.DataSource = ArticoliRsBindingSource ComboBox2.DisplayMember = "Articolo" ComboBox2.ValueMember = "ID" ComboBox2.DataBindings.Add("SelectedValue", FatturaDettaglioBindingSource, "IdArticolo") DOPO SELEZIONATO IL COMBO Dim sql As String = "select * from Operaio where Nominativo= '" & OperaioComboBox1.Text & "'" Dim cmd As New OleDb.OleDbCommand(sql, Dbazienda) Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader Do While dr.Read Operaio.Text = (dr.Item("Id") & " - " & dr.Item("Nominativo")) MyOperaio = dr.Item("Id") MyCliente = 0 Cliente.Text = "" Loop |