各位朋友,在下这厢有礼了!请教关于循环的问题?
在下想做一个关于循环的问题,也就是将一个数组(10),能够把数组里的内容循环显示出来。具体地举例说,就是比如数组里给出的十个字符串,如:一、二、三、四、。。。。。十。输给一个条件,如时间变换之类,便可以任意地显示出来的是:二、三、四、五、。。。。或三、四、五、六、七、八、。。。。或九、十、一、二、三、四、。。。。或、十、一、二、三、四、。。。。如此随着条件的变化,可以循环不已。而且希望在表单里的TXET1里显示出来。但在下才疏学浅,实在编不出这样的程序,真心的向各位高手朋友请教!先在此谢谢了!
假如表单中开始的字符用一个文本框表示(text1),直接写上1,2,3,...。命令按钮为显示(command1),结果显示在文本框(Text2)中。则命令按钮的click()代码为
lcString='一二三四五六七八九十'
If Between(ThisForm.Text1.Value,1,10)
ThisForm.Text2.Value=Substr(lcString+lcString,ThisForm.Text1.Value*2-1,20)
Else
ThisForm.Text2.Value=''
EndIf