Strings.Right(dtExcelValue.Rows(intRowCounter).Item("Settlement Account No.").ToString,4).PadLeft(12,"X"c)