VB語言中輸出楊輝三角形的方法

賴潤(rùn)平

摘 要：對(duì)VB語言、楊輝三角形以及VB語言輸出楊輝三角形作了簡(jiǎn)單分析，結(jié)合輸出楊輝三角形的實(shí)例，探討了利用VB語言中輸出楊輝三角形的方法，希望能夠?yàn)閷W(xué)生更好地學(xué)習(xí)VB程序設(shè)計(jì)提供一定的幫助。

關(guān)鍵詞：VB語言；楊輝三角形；方法

高中生學(xué)習(xí)VB程序設(shè)計(jì)時(shí)，不僅需要掌握一定的基礎(chǔ)知識(shí)，同時(shí)還應(yīng)當(dāng)掌握相關(guān)的專業(yè)知識(shí)。不過，由于我們高中生學(xué)習(xí)VB并非是專業(yè)編程，也不是進(jìn)行軟件開發(fā)，學(xué)習(xí)過程中應(yīng)當(dāng)結(jié)合實(shí)際案例掌握VB程序設(shè)計(jì)的步驟，充分發(fā)揮我們的能動(dòng)作用，就能達(dá)到學(xué)習(xí)VB程序設(shè)計(jì)的效果。

一、VB語言與楊輝三角形

1.VB語言

VB語言是微軟開發(fā)的一種編程語言，VB語言是目前應(yīng)用最為廣泛的一種語言。VB語言最為重要的特征就是不管是專家或者是初學(xué)者，能夠確保非常方便地應(yīng)用VB語言。VB語言能夠通過簡(jiǎn)單的構(gòu)建應(yīng)用程序GUI系統(tǒng)，來實(shí)現(xiàn)對(duì)復(fù)雜應(yīng)用程序的開發(fā)，程序開發(fā)人員無需編寫過多的代碼便能夠完成相對(duì)簡(jiǎn)單的

程序。

2.楊輝三角形

將二項(xiàng)式（a+b）n展開以后，得到該二項(xiàng)式不同部分的系數(shù)值，在n的取值為1，2，3…n時(shí)，此時(shí)將得出的系數(shù)列在同一張表格之中，此表被稱之為二項(xiàng)式系數(shù)表，而又由于該二項(xiàng)式系數(shù)表的形狀類似于三角形，我國(guó)南宋時(shí)期數(shù)學(xué)家楊輝對(duì)這一三角形做了大量的研究，因此，我們將這一三角形叫做楊輝三角形，如圖

所示。

二、輸出楊輝三角形的思想

Dim A（） As Integer‘通用說明

Private Sub Command1_Click（）

yhs=InputBox（“輸入需要輸出楊輝三角形的層數(shù)”，“提示信息”，）‘用以確定輸出楊輝三角形的層數(shù)

If yhs < 3 Or Not IsNumeric（yhs） Then ‘針對(duì)一些未達(dá)到要求的數(shù)據(jù)加以處理

MsgBox“請(qǐng)注意：數(shù)據(jù)輸入時(shí)數(shù)字要超過3或是數(shù)字格式出現(xiàn)錯(cuò)誤”，“系統(tǒng)信息”

Else‘就達(dá)到要求的楊輝三角形輸出層數(shù)加以計(jì)算并完成

輸出

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） ‘這一標(biāo)點(diǎn)的作用是用來完成定點(diǎn)輸出的

For i = 3 To yhs

A（i， 1） = 1： A（i， i） = 1： Print a（i， 1）， ‘輸出楊輝三角形的第一列數(shù)據(jù)

For j = 2 To i- 1‘對(duì)楊輝三角形中中間列數(shù)據(jù)進(jìn)行計(jì)算并完成輸出

A（i， j） = A（i - 1， j - 1） +A（i - 1， j）

Print A（i， j），

Next j

Print A（i， i）‘輸出楊輝三角形的最后一列數(shù)據(jù)

Next i

End If

End Sub

三、輸出楊輝三角形的改進(jìn)

要想進(jìn)一步提升程序擁有的執(zhí)行效率，可以采用下列改進(jìn)

程序：

Dim A（） As Long

Dim N As Integer

N=Val（InputBox（“輸入需要輸出楊輝三角形的層數(shù)”， “提示信息”）

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

Print

Next

Else

MsgBox ”需要再次輸入輸出楊輝三角形的有效行數(shù)：”

End if

在利用VB語言輸出楊輝三角形時(shí)，要是只在窗體之中進(jìn)行顯示，則其和乘法表的實(shí)現(xiàn)過程非常相近，存在的差異僅僅是在循環(huán)控制變量過程中自第3行開始，并且，每行均是從第2列至第（i-1）列進(jìn)行計(jì)算。

參考文獻(xiàn)：

[1]馮潔，吳芳.探討C語言中輸出楊輝三角的教學(xué)方法[J]. 電腦知識(shí)與技術(shù)（學(xué)術(shù)交流），2007（13）：113，115.

[2]張躍龍.高中“VB程序設(shè)計(jì)語言”課程教學(xué)改革探索與實(shí)踐[J].考試周刊，2017（61）：134.

編輯 謝尾合