Working with Matrix

Question

Hello,
I've designed a form using screen painter that has a matrix with columns - IteCode, Description, Rate, Qty, LineTotal.
Now i want this matrix to work as any normal matrix on Purchase Order or A/P Invoice etc.
I have bouund a CFL to ItemCode column, when i select a value it does come in the column but an error is also thrown, *Item - Can't set value on item because the item can't get focus.  [66000-153]".
'Code executed when et_CHOOSE_FROM_LIST event is fired.
If objEvent.BeforeAction = False Then
        Dim oCFLEvent As SAPbouiCOM.IChooseFromListEvent = DirectCast(pVal, SAPbouiCOM.IChooseFromListEvent)
        Dim oDataTable As SAPbouiCOM.DataTable = oCFLEvent.SelectedObjects
        Dim val As String
        dtgItems = objUserForm.Items.Item("dtgItems").Specific
        txtICode = dtgItems.Columns.Item("ItemNo").Cells.Item(pVal.Row).Specific
        txtIName = dtgItems.Columns.Item("ItemDesc").Cells.Item(pVal.Row).Specific
        Select Case oCFLEvent.ChooseFromListUID
              Case "cflIno"
                    val = oDataTable.GetValue(0, 0).ToString()
                    txtICode.String = val  'Error Here
              Case "cflIName"
                    val = oDataTable.GetValue(1, 0).ToString()
                    txtIName.String = val
        End Select
end if
Please help me whi this and the entire matrix if possible.

Answer 1

Solved the problem