Set col = datagrid.Columns.Add(8) ' "8" indicates a Combo column With col .Caption = "Some Field" .FieldName = "SOMEFIELD" .Visible = true .Width = 50 .ReadOnly = false .DisableEditor = false With .Items .Add("Value 1") .Add("Value 2") .Add("Value 3") End With End With