Sql = "SELECT Condominio AS Nominativo FROM Condomini Where Condomini.attivo = true ORDER BY Condominio;" DatSet = New DataSet("Condominio") DatAdpter = New OleDb.OleDbDataAdapter(Sql, Dbazienda) DatAdpter.Fill(DatSet, "Condominio") BindSrc = New BindingSource BindSrc.DataSource = DatSet NominativoComboBox.DisplayMember = "Nominativo" NominativoComboBox.ValueMember = "id" NominativoComboBox.DataSource = DatSet.Tables("Condominio") Sql = "Select Nominativo from Operaio order by Nominativo" DatSet = New DataSet("Operaio") DatAdpter = New OleDb.OleDbDataAdapter(Sql, Dbazienda) DatAdpter.Fill(DatSet, "Operaio") BindSrc = New BindingSource BindSrc.DataSource = DatSet OperaioComboBox1.DisplayMember = "Nominativo" OperaioComboBox1.ValueMember = "id" OperaioComboBox1.DataSource = DatSet.Tables("Operaio") TextBox1.Text = Year(DateTime.Now) Gestione = Year(DateTime.Now) |