計算機程式期末考試

計算機程式期末考試:

Date : 2008/6/26 (四) 1:30 - 3:30 p.m.

Room: 上機教室

範圍: 上課內容

Open Book, 上機測驗

1. 同學攜帶學生證應試.

2. 攜帶隨身碟（繳交電子檔）

ATM 自動提款機程式

ATM 程式需求與流程:

1. 登入功能 : 輸入帳號與密碼. 密碼正確進入功能選單.

2. 功能選單 : 可選擇 1. 提款, 2.轉帳, 3.餘額查詢.

3. 提款功能 : 可輸入提款金額, 判斷帳戶餘額是否大於提款金額?

4. 轉帳功能 : 可輸入轉帳金額, 判斷帳戶餘額是否大於轉帳金額?

5. 餘額查詢 : 輸出目前帳戶餘額.

OX 遊戲設計

OX 遊戲設計:


判斷下圖 OX 遊戲的勝負結果.



變數宣告

Dim x1, x2, x3 As Integer

Dim x4, x5, x6 As Integer

Dim x7, x8, x9 As Integer



分別代表OX 棋盤上的位置 與 資料.

變數的值分別為:

1. 空格 : 數字 0

2. 畫 O : 數字 1

2. 畫 X : 數字 2

x1 = 1
x2 = 1
x3 = 1
x4 = 0
x5 = 2
x6 = 0
x7 = 2
x8 = 2
x9 = 0

If (x1 = 1 And x2 = 1 And x3 = 1) Then
MsgBox(" O 獲勝 ! ")
End If