一、控件名.DataBindings.Add("属性名", dataset_system.Tables("Company"), dataset_system.Tables("Company").Columns.Item(i).Caption)
属性: 如() 'TEXT'

二、ListBox与ComboBox的数所绑定
Me.ComboBox1.DataSource = dataset_system.Tables("表名")
Me.ComboBox1.DisplayMember = "字段名1"
Me.ComboBox1.ValueMember = "字段名2"

获取相应的值公别用Me.ComboBox1.SelectedText与(Me.ComboBox1.SelectedValue