用vb做杨辉三角的程序,输入n则显示n行

另:(1)用vb做一个程序由e^x=(x^1)/1+(x^2)/2!+(x^3)/3!+.....+(x^n)/n!求e的值,其中n是可输入的数,x为任意数或由1开始逐步... 另:(1)用vb做一个程序
由e^x=(x^1)/1+(x^2)/2!+(x^3)/3!+.....+(x^n)/n!求e的值,其中n是可输入的数,x为任意数或由1开始逐步增大的数。
(2)谁有vb初学者适用的小程序,可否奉献几个
注:本人学习vb不久,刚学到循环和数组,希望各位在帮我的时候讲的详细一点,谢谢啦!
展开
 我来答
wjjsuda
推荐于2016-11-04 · TA获得超过422个赞
知道小有建树答主
回答量:966
采纳率:0%
帮助的人:361万
展开全部
Option Base 1
Private Sub Command1_Click()
Dim a(), b(), i, j, k As Integer
i = Val(Text1)
ReDim Preserve a(1)
ReDim Preserve b(1)
a(1) = 1
b(1) = 1
If i = 1 Then
Print 1
Else
For j = 1 To i
a = b
ReDim Preserve a(j)
ReDim Preserve b(j)
Print b(1);
For k = 2 To j
b(k) = a(k - 1) + a(k)

Print b(k);
Next k
Print
Next j
End If
End Sub
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式