VsFlexGrid (свойство Editable) - VB

Формулировка задачи:

Здравствуйте ) Подскажите пожалуйста, как у компонената ActiveX разрешить для редактирования, только одну ячейку, а то свойство fg.Editable, открывает доступ для редактирования сразу всех

Решение задачи: «VsFlexGrid (свойство Editable)»

textual
                            Листинг программы 
                        

                            <font color="blue">Private</font> <font color="blue">Sub</font> VSFlexGrid1_BeforeEdit(<font color="blue">ByVal</font> Row <font color="blue">As</font> <font color="blue">Long</font>, <font color="blue">ByVal</font> Col <font color="blue">As</font> <font color="blue">Long</font>, Cancel <font color="blue">As</font> <font color="blue">Boolean</font>)
<font color="blue">Dim</font> n <font color="blue">As</font> <font color="blue">Integer</font>
n = VSFlexGrid1.RowSel
<font color="00AA00">'No change !!!</font>
<font color="blue">If</font> VSFlexGrid1.Col = <font color="darkblue"><b>1</b></font> <font color="blue">Or</font> VSFlexGrid1.Col = <font color="darkblue"><b>2</b></font> <font color="blue">Or</font> VSFlexGrid1.Col = <font color="darkblue"><b>3</b></font> <font color="blue">Then</font> Cancel = True

<font color="blue">End</font> <font color="blue">Sub</font>
                        