定义一个变量 dim i as intger 然后判断 if imod 5 =0 then text1=text1 & vbcrlf (注意文本框的multiline 属性为true)
for i=1 to 20print i;if i mod 5=0 then print next i一行输出5个元素。
元素指什么?文字还是什么东西?