求教如何在vb中产生如下数列窗体中存在4个text,name为text1-text4,一个command,name为"command",caption为"计算",text1、text2产生数列的前两项,text3为项数.数列产生规则为,前两项为小于10正整数,将此两数

Question

求教如何在vb中产生如下数列
窗体中存在4个text,name为text1-text4,一个command,name为"command",caption为"计算",text1、text2产生数列的前两项,text3为项数.数列产生规则为,前两项为小于10正整数,将此两数相乘,若城际小于10,则以此乘积为第三项,若大等于10,则以乘积的十位数为数列第三项,个位数为第四项.再用数列的最后两位相乘,用上述规则产生后面的项,直到第n项,将此数列的前n项显示在text4中.快考试了,头痛ing

Answer 1

sub command_click()
dim n as integer
dim nCount as integer
dim lastN as integer
n=2
if text1.text