Set Matrix Value using SAP Business One Studio Suite

Code for Set Matrix Value 

  Private Sub SetMatrixValues(ByVal aMatrix As SAPbouiCOM.Matrix, ByVal coluid As String, ByVal intRow As Integer, ByVal strvalue As String)  
       Try  
         aMatrix.Columns.Item(coluid).Cells.Item(intRow).Specific.value = strvalue  
       Catch ex As Exception  
         Message(ex.Message, SAPbouiCOM.BoStatusBarMessageType.smt_Error)  
       End Try  
   
     End Sub