哪位指点一下有几道VB题

Question

   3：求圆周率∏的近似值。公式为 = 1- + - …+（-1）（n+1）× ，直到最后一项的绝对值小于0.000001 为止。
保存窗体文件(实验3.frm)和工程文件(实验3.vbp)
提示：先用公式计算，最后乘个4就是圆周率∏的结果
4：有一分数序列 、 、 、 ……，求这个数列前20 项之和。
保存窗体文件(实验4.frm)和工程文件(实验4.vbp)  
提示：运行结果为32.6602607986416
5：求S=a+aa+aaa+…+aaa(n个a)。界面如右图所示。编写按钮的单击事件，将结果在第三个文本框中输出。例如a=2，n=4，则求S=2+22+222+2222。保存窗体文件(实验5.frm)和工程文件(实验5.vbp)
6、在窗体的单击事件过程中编写程序求s=1*2*3*…*n,求s不大于32767时的最大的n, 并将结果在窗体上输出；
保存窗体文件(实验6.frm)和工程文件(实验6.vbp)
7、 在窗体上打印输出以下图形，要求用FOR循环实现。
 
保存窗体文件(实验7.frm)和工程文件(实验7.vbp[/size])

Answer 1

补充如下：
3：求圆周率∏的近似值。公式为是∏\4= 1- 1\3+1\5 - 1\7…+（-1）的（n+1）次方×1\（2n-1） ，直到最后一项的绝对值小于0.000001 为止。
提示：先用公式计算，最后乘个4就是圆周率∏的结果
4：有一分数序列2\1 、3\2 、5\3 、8\5 ……，求这个数列前20 项之和。
保存窗体文件(实验4.frm)和工程文件(实验4.vbp)  
提示：运行结果为32.6602607986416
5：求S=a+aa+aaa+…+aaa(n个a)。界面如右图所示。编写按钮的单击事件，将结果在第三个文本框中输出。例如a=2，n=4，则求S=2+22+222+2222。保存窗体文件(实验5.frm)和工程文件(实验5.vbp)
6在窗体的单击事件过程中编写程序求s=1*2*3*…*n,求s不大于32767时的最大的n, 并将结果在窗体上输出
 7在窗体上打印输出以下图形，要求用FOR循环实现。
1
-1 -12
1 12 123
-1 -12 -123 -1234