Dim ComboTextCol As New DataGridComboBoxColumn
ComboTextCol.MappingName = "bytNote" 'must be from the grid table...
ComboTextCol.HeaderText = "Type"
ComboTextCol.NullText = ""
ComboTextCol.Width = 80
ComboTextCol.ColumnComboBox.DataSource = dsSearch.Tables("Notelist").DefaultView 'dv;
ComboTextCol.ColumnComboBox.DisplayMember = "strType"
ComboTextCol.ColumnComboBox.ValueMember = "lngType"
tablestyle.PreferredRowHeight = ComboTextCol.ColumnComboBox.Height + 2
tablestyle.GridColumnStyles.Add(ComboTextCol)
|