rivate sub form1_click()dim i as integer,j as integerfor i = 1 to 9for j = 1 to iprint tab(4*j);i * j ;next jnext iend sub。