<DataTemplate x:Key ="Display">
<Grid Background="Red">
<TextBlock Text="{Binding Value}"></TextBlock>
</Grid>
</DataTemplate>
<DataTemplate x:Key ="Edit">
<CheckBox IsChecked="{Binding Value, Mode= TwoWay}"></CheckBox>
</DataTemplate>
DataTemplateCellType dataTemplateCellType = new DataTemplateCellType();
dataTemplateCellType.DisplayElementTemplate = this.Resources["Display"] as DataTemplate;
dataTemplateCellType.EditElementTemplate = this.Resources["Edit"] as DataTemplate;
gcSpreadGrid1[0, 0].CellType = dataTemplateCellType;
Dim dataTemplateCellType As New DataTemplateCellType()
dataTemplateCellType.DisplayElementTemplate = TryCast(Me.Resources("Display"), DataTemplate)
dataTemplateCellType.EditElementTemplate = TryCast(Me.Resources("Edit"), DataTemplate)
gcSpreadGrid1(0, 0).CellType = dataTemplateCellType