vb求数列1＋3＋3＋9＋27..前6项和
这个数列的规律是前两项的乘积等于第三项，也就是第n项，等于（n-1）项和（n-1）的乘积。
用VB计算这个数列的前n项之和的程序如下：
Private Sub Command1_Click()
Dim n As Integer,i As Integer,s As Single,m As Integer
n = Val(Text1.Text)
a=1
b=3
For m = 1 To n
i = a*b
s = s + i
a=b
b=i
Exit For
Next m
Text2.Text = s
End Sub
扩展资料：
Visual Basic 语言具有不支持继承、无原生支持多线程、异常处理不完善等三项明显缺点，使其有所局限性。
1、不支持继承
VB 5.0 和 VB 6.0 都是基于对象的编程语言，但是不包含继承特性。VB 中提供了特殊的类的功能，但是还是不能满足程序员的需求。
2、无原生支持多线程
Visual Basic 对于多线程无原生支持，只能通过Windows API的调用实现，且极其的不稳定。因为在API创建的线程中，并没有自动初始化运行时库，导致部分的函数无法使用。一般的，在VB6等早期的VB开发环境下，使用API创建线程的目的是完成容易使程序假死的大量数据或者逻辑的计算。
3、异常处理不完善
Visual Basic 中内置异常处理，即使未写异常处理代码，一旦用户出错也会弹出一个明确写出出错原因对话框，接着程序终止。
Visual Basic 中可以使用 Err.Raise抛出异常。对系统及用户抛出的异常的处理常用两种模式：一是使用 On Error Resume Next 处理错误；另一种是使用 On Error Goto 将运行引入错误处理代码。但相对 C++ 等语言而言，这样的异常处理破坏了代码的结构。
参考资料来源：百度百科-VB
