1: 2: 3: 4: 5: 6: 7: 8: 9: 10:
Dim ComboTextCol als Nieuwe DataGridComboBoxColumn ComboTextCol.MappingName = „bytNote“ 'moet van de netlijst zijn… 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)