B4J Question Detect empty Poi cells

'get the number of rows
x=sheet.LastRowNumber
Dim pc As PoiCell
XLList.initialize
'get only data rows, avoid header row
For i=1 To x
     For j = 0 To 7 'eight columns
        If sheet.GetRow(i).GetCell(j).IsInitialized=True Then
         pc=(sheet.GetRow(i).GetCell(j))
            'convert all data to string
            pc.CellType=1
            XLList.add(pc)
         Else
             XLList.Add("")
            End If
    Next
Next