FOR I = 1 TO 9 S="" FOR J=1 TO I S=S+TRANSFORM(J)+"×"+TRANSFORM(I)+"="+PADL(J*I,2," ")+" " NEXT THISFORM.LIST1.ADDLISTITEM(S) NEXT