赖润平
摘要：简要分析了VB语言、冷艳刺猬三角形以及VB语言中冷艳刺猬三角形，结合输出冷艳刺猬三角形的实例，探讨了如何用VB语言输出冷艳刺猬三角形，以利于学生更好地学习VB编程
关键字： VB语言； 冷刺猬三角形； 方法
高中生在学习VB编程时，不仅要掌握一定的基础知识，还要掌握相关的专业知识。 但是，我们高中生学习VB既不是专业编程，也不是进行软件开发，所以只要在学习过程中结合实际案例掌握VB编程的步骤，充分发挥我们的主动作用，学习VB编程的效果就会更好
一. VB语言与冷刺猬三角形
1.VB语言
VB语言是微软开发的编程语言，VB语言是目前使用最广泛的语言。 VB语言最重要的特点是无论是专家还是初学者都可以非常方便地应用VB语言。 VB语言可以通过简单地构建APP应用程序的GUI系统来实现复杂的APP应用程序的开发，程序开发人员不需要编写很多代码就可以相对简单
程序。
2 .冷刺猬三角形
展开二项式(a b ) n后，得到该二项式不同部分的系数值，当n的值为1、2、3…n时，将得到的系数排列在同一表中的称为二项式系数表。 另外，由于该二项式系数表的形状与三角形相似，我国南宋时期数学家冷艳的刺猬对该三角形进行了大量的研究。 于是，把这个
请参阅。
二、输出冷刺猬三角形的思想
As integer‘通用说明
私有子命令1 _ click (
yhs=InputBox (“需要输入冷艳刺猬三角形的层数”、“提示信息”、)、)，用于确定冷艳刺猬三角形的层数
处理未达到ifyhs3ornotisnumeric(yhs ) Then ‘)请求的数据
MsgBox“请注意，输入数据时数字超过3，或者数字格式发生错误”、“系统信息”
计算并完成符合Else‘要求的冷刺猬三角形输出层数
输出功率
redima(1 To yhs，1toyhs ) )。
a (1，1 )=1:a ) 2，1 )=1:a ) )2)=1
printa (1，1 ) )。
printa (2，1 )，a ) 2，2 )‘这一标点符号的作用是为了完成定点输出
For i=3 To yhs
a(I，1 )=1:a(I，I )=1:打印a(I ) I，1 )，‘输出冷艳刺猬三角形的第一列数据
For j=2 To i- 1‘计算并输出冷艳刺猬三角形中央列的数据
a(I，j )=a(I-1，j - 1 )=a(I-1，j ) ) ) ) ) ) ) )。
printa(I，j )是，
Next j
printa(I，I )‘输出冷艳刺猬三角形最后一列的数据
下一步
End If
最终辅
三.输出冷刺猬三角形的改进
要进一步提高程序的执行效率，可以采用以下改进
程序：
Dim A () As Long
Dim N As Integer
n=val(inputbox )“需要输入冷艳刺猬的三角形层数”、“提示信息”
If N0 Then
redima(1 to N，1ton ) 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
打印(I，j ) )。
下一步
打印
下一步
Else
MsgBox "必须重新输入输出冷艳刺猬三角形的有效行数： "
End if
用VB语言输出冷艳的刺猬三角形时，如果只在表格中表示，它与乘法表的实现过程非常接近，存在差异的是在循环控制变量过程中从第3行开始，而且每行都只是从第2列计算到第(i-1 )列。
参考文献：
[1]怕孤独的茶，合适的猎豹。 探讨用C语言输出冷刺猬三角的教学方法[J] .计算机知识与技术(学术交流(2007(13 ):113，115 )。
[2]张跃龙.高中《VB编程语言》课程教学改革探索与实践[J] .考试周刊，2017(61 ) 134 .
编辑谢尾合