赖润平
摘 要：对VB语言、杨辉三角形以及VB语言输出杨辉三角形作了简单分析，结合输出杨辉三角形的实例，探讨了利用VB语言中输出杨辉三角形的方法，希望能够为学生更好地学习VB程序设计提供一定的帮助。
关键词：VB语言；杨辉三角形；方法
高中生学习VB程序设计时，不仅需要掌握一定的基础知识，同时还应当掌握相关的专业知识。不过，由于我们高中生学习VB并非是专业编程，也不是进行软件开发，学习过程中应当结合实际案例掌握VB程序设计的步骤，充分发挥我们的能动作用，就能达到学习VB程序设计的效果。
一、VB语言与杨辉三角形
1.VB语言
VB语言是微软开发的一种编程语言，VB语言是目前应用最为广泛的一种语言。VB语言最为重要的特征就是不管是专家或者是初学者，能够确保非常方便地应用VB语言。VB语言能够通过简单的构建应用程序GUI系统，来实现对复杂应用程序的开发，程序开发人员无需编写过多的代码便能够完成相对简单的
程序。
2.杨辉三角形
将二项式(a+b)n展开以后，得到该二项式不同部分的系数值，在n的取值为1，2，3…n时，此时将得出的系数列在同一张表格之中，此表被称之为二项式系数表，而又由于该二项式系数表的形状类似于三角形，我国南宋时期数学家杨辉对这一三角形做了大量的研究，因此，我们将这一三角形叫做杨辉三角形，如图
所示。
二、输出杨辉三角形的思想
Dim A() As Integer‘通用说明
Private Sub Command1_Click()
yhs=InputBox(“输入需要输出杨辉三角形的层数”，“提示信息”，)‘用以确定输出杨辉三角形的层数
If yhs < 3 Or Not IsNumeric(yhs) Then ‘针对一些未达到要求的数据加以处理
MsgBox“请注意：数据输入时数字要超过3或是数字格式出现错误”，“系统信息”
Else‘就达到要求的杨辉三角形输出层数加以计算并完成
输出
ReDim A(1 To yhs， 1 To yhs)
A(1， 1) = 1： A(2， 1) = 1： A(2， 2) = 1
Print A(1， 1)
Print A(2， 1)， A(2， 2) ‘這一标点的作用是用来完成定点输出的
For i = 3 To yhs
A(i， 1) = 1： A(i， i) = 1： Print a(i， 1)， ‘输出杨辉三角形的第一列数据
For j = 2 To i- 1‘对杨辉三角形中中间列数据进行计算并完成输出
A(i， j) = A(i - 1， j - 1) +A(i - 1， j)
Print A(i， j)，
Next j
Print A(i， i)‘输出杨辉三角形的最后一列数据
Next i
End If
End Sub
三、输出杨辉三角形的改进
要想进一步提升程序拥有的执行效率，可以采用下列改进
程序：
Dim A() As Long
Dim N As Integer
N=Val(InputBox(“输入需要输出杨辉三角形的层数”， “提示信息”)
If N>0 Then
ReDim A(1 to N，1 to N) As Long
Me.Cls
For i=1 to N
For j=1 to i
If j=1 or j=I Then
A(i，j)=1
Else
A(i，j)=A(i-1，j)+A(i-1，j-1)
End If
Print A(i，j)
Next
Next
Else
MsgBox ”需要再次输入输出杨辉三角形的有效行数：”
End if
在利用VB语言输出杨辉三角形时，要是只在窗体之中进行显示，则其和乘法表的实现过程非常相近，存在的差异仅仅是在循环控制变量过程中自第3行开始，并且，每行均是从第2列至第(i-1)列进行计算。
参考文献：
[1]冯洁，吴芳.探讨C语言中输出杨辉三角的教学方法[J]. 电脑知识与技术(学术交流)，(13)：113，115.
[2]张跃龙.高中“VB程序设计语言”课程教学改革探索与实践[J].考试周刊，(61)：134.
编辑 谢尾合
