按揭購房還款計畫

知識點：（1）多模組程式設計；（2）文字檔案的儲存；（3）列表框等基本控制項的使用。

1. 題目介紹

使用銀行按揭貸款是目前購買商品房常用的方式，即一次性貸款，然後每月償還，在預定年限（還款年數）內連本帶息還清為止。本題目要求編制乙個實用程式，幫助準備以按揭貸款形式購買商品房的人士計算出以不同年限、不同數額、不同還款方式貸款時每月應還的款數、還款的總額以及還款額和貸款額的比例，幫助其進行決策。

下面將按揭貸款的知識作一介紹。

（1）貸款方式分為兩類：

1 商業貸款，年利率為5%；

2 政策性貸款，年利率為4%。政策性貸款需貸款人具有有效的公積金賬戶，並且每人最多能貸6萬元。

例如，乙個3口之家購買商品房，準備貸款20萬，其中兩個人有公積金賬戶，可以享受12萬元的政策性貸款，其餘8萬元為商業性貸款。

（2）無論是商業性貸款還是政策性貸款，目前常用的還款方式有一下兩種：

① 等額本息還款法，每月還款數額相同，為：

2 等額本金還款法，每月還款數額逐月遞減，第i個月的還款額為：

等額本金還款法可以理解為每月償還當月的貸款平均數加上所有未還款的當月利息。

如果同時有商業性貸款和政策性貸款，必須採用相同的還款方式和還款年限。

（3）名詞解釋如下所述：

①本金：即貸款總額；

②月利率=年利率/12；

③還款月數=還款年數12。

2.功能要求

（1）執行程式，顯示主視窗（如圖1.1），其中「還款年數」組合框預設值為「15」，「享受政策性貸款的人數」預設為「兩人」，「還款起始年月」預設為使用者使用時的日期。

（2）使用者根據需要輸入貸款總額、選擇還款年數、政策性貸款年數和還款起始年月，然後單擊「等額本息還款法」按鈕彈出「等額本息還款法」對話方塊（如圖1.2），顯示以「等額本息還款法」還款時每月的還款額、全部本息總和（每月還款額還款月數）、還款額和貸款額之比（全部本息總和除以貸款額）。

圖1.1 主視窗圖1.2 等額本息還款法

（3）在主視窗中單擊「等額本息還款法」按鈕，彈出「等額本息還款法」對話方塊（見圖1.3），列表框中顯示出從起始還款年月開始每月的還款額以及全部本息總和及還貸比。單擊「儲存到檔案」按鈕，顯示圖1.

4所示輸入視窗提示檔名及路徑，然後將列表框中的內容以文字檔案的形式儲存到指定的檔案中（檔案內容如圖1.5所示）。

（4）「等額本金還款法」和「等額本息還款法」視窗都以模態視窗顯示，即必須單擊「關閉」按鈕後才能繼續使用主視窗。「等額本金還款法」視窗中「每月還款額」列表框中的顯示的內容要求上下對齊。如果未輸入貸款總額就單擊「計算」按鈕，程式顯示圖1.

6所示的訊息框給予的提示。

圖1.6 錯誤資訊

3.難點與提示

（1）對於本程式來說，啟動視窗就是主視窗（如圖1.1所示），其他兩個視窗為對話方塊（圖1.2和圖1.3），應將主視窗的boderstyle屬性設為1，將另兩個設定為3.

（2）建議編寫如下的兩個函式分別計算在不同的貸款額、利率和還款年數情況下的「等額本金還款法」和「等額本息還款法」還款數額。

function a（corpus as single , rate as single ,year as integer ）as single

function b（corpus as single , rate as single ,year as integer ,arr()_

as single）as single

a函式返回「等額本息還款法」的每月還款額，其中引數意義如下所述。

corpus：貸款本金 rate：年利率 year：還款年數。

b函式返回「等額本金還款法」的還款總額，通過arr()陣列引數返回每月的還款額，其他引數意義與a函式相同。

4.更上一層樓

本題目樣例程式中的貸款利率無法改變，如果發生利率改變調整此程式就不能使用了。試著修改程式使之可以方便地指定利率並計算。