計算機硬件知識考試系統(tǒng)

題目：計算機硬件知識考試系統(tǒng)

一、課程設計時間

2011年3月7日~11日（第1周），共計1周。

二、課程設計內(nèi)容

用VB+Access組合，編寫“計算機硬件知識考試系統(tǒng)”軟件。題目信息存儲到Access

數(shù)據(jù)庫的表中，題目至少包括：選擇題、填空題和問答題等。

程序能實現(xiàn)對3種題型的考試及考試計時等功能。

用戶界面中的菜單至少應包括“考生登錄”、“題型選擇”、“交卷”、“退出”5項。

三、課程設計要求

程序質量：

令貫徹事件驅動的程序設計思想。

令用戶界面友好，功能明確，操作方便；可以增加其它功能或修飾。

令代碼應適當縮進，并給出必要的注釋，以增強程序的可讀性。

課程設計說明書：

令課程結束后，上交課程設計說明書和源程序。課程設計說明書的內(nèi)容參見提

供的模板。

四、指導教師和學生簽字

指導教師：學生簽名：

五、成績

六、教師評語

目錄

'、需求分析.......................................4

二、設計分析.......................................5

三、關鍵技術.......................................7

四、總結..........................................10

五、完整的源程序..................................11

六、參考文獻......................................14

一、需求分析

計算機硬件知識考試系統(tǒng)，主要是為了實現(xiàn)考試題目

的錄入與學生作答的輸出，以及對考試時間的控制這兩大

方面內(nèi)容。考題的錄入采用錄入Access中表中數(shù)據(jù)，考

題的輸出采用把學生的作答輸出至一個Txt文檔中供老

師批閱，才用倒計時功能對考試時間進行控制，時間到就

自動結束考試

①在Access表中建立題庫，題庫欄目包括兩項，一

是自動編號，二是問題。采用選擇題、填空題與主觀題分

表，使得考試系統(tǒng)可以對三種題型分別作答，使考卷整潔,

批閱輕松。

②使用Txt作為學生作答的輸出，可以使不同學生多

次作答題目，每次都不發(fā)生沖突，老師批閱可以對每個學

生所生成的Txt處理。

③設計倒計時功能，如果時間結束，則自動關閉考試

系統(tǒng)。

④題庫可以擴充且不影響Txt輸出。

二、設計分析

(1)基本原理：建立程序設計與數(shù)據(jù)庫(題庫)的

連接，用Write語句將學生作答錄入特定Txt

文檔中，用Timer控件對倒計時進行管理。

(2)總體設計：

圖1總體設計

(3)詳細設計：

圖2詳細設計

（4）數(shù)據(jù)庫設計：

數(shù)據(jù)庫的設計包括三個表格，可以對選擇題、填空題與主觀題的分別處

理。

1）選擇題表

如表1所示。

表1選擇題表

題號（自動編號）題目（文本文檔）

1DVD刻錄光驅的縮寫是：A、DVD-ROMB、CD-ROM

C、DVD-RWD>CD-RW

2容量最大的光存儲是一下的：A、3.5寸磁盤B、CD光

盤C、DVD光盤D、藍光光盤

3一下哪些不是CPU的參數(shù)：A、主頻B、核數(shù)C、前

端輸出D、內(nèi)存大小

*

2）填空題表

如表2所示。

表2填空題表

題號（自動編號）題目（文本文檔）

1長按計算機電源按鈕可以（）

2CPU與CPU風扇之間用（）傳導熱量

3選擇多個內(nèi)存條必須保證每個內(nèi)存條（）

*

3）主觀題表

如表3所示。

表3主觀題表

題號（自動編號）題目（文本文檔）

1簡述計算機主板南橋的工作原理

2分析IDE硬盤與SATA硬盤的區(qū)別

*

三、關鍵技術

(1)創(chuàng)建倒數(shù)計時功能的頁面與程序如下。

圖3

DimtAsInteger

PrivateSubCommandl_Click()

Form2.Show

Form5.Show

Forml.Hide

t=60*Val(30)

Timerl.Enabled=True

EndSub

PrivateSubCommand2_Click()

End

EndSub

PrivateSubTimerl_Timer()

DimM,sAsInteger

t=t-1

M=Int(t/60)

s=tMod60

Form5.Labell.Caption=M&”分“&s&”秒”

If(t=0)Then

Timerl.Enabled=False

Forml.Hide

Form3.Hide

Form4.Hide

Form5.Hide

EndIf

EndSub

PrivateSubForm_Load()

EndSub

(2)Access題庫錄入采用如下頁面與程序

圖片4

圖片5

圖片6

PrivateSubCommandl_Click()

End

EndSub

PrivateSubCommand2_Click()

Form4.Show0

Form2.Hide

EndSub

PrivateSubCominand3_CIick()

Form3.Show0

Form2.Hide

EndSub

PrivateSubTextl_Change()

EndSub

PrivateSubForm_Load()

EndSub

PrivateSubCommandl_Click()

Form2.Show0

Form3.Hide

EndSub

PrivateSubCommand2_Click()

Form4.Show0

Form3.Hide

EndSub

PrivateSubCommand3_Click()

End

EndSub

PrivateSubForm_Load()

EndSub

PrivateSubCommandl_Click()

Form2.Show0

Form4.Hide

EndSub

PrivateSubCommand2_Click()

Form3.Show0

Form4.Hide

EndSub

PrivateSubCommand3_Click()

End

EndSub

PrivateSubForm_Load()

EndSub

(3)Txt文件的輸出的程序

PrivateSubCommandl_Click()

cl=Form1.Textl.Text:c2=Form2.text2.Text:c3=Form2.Text3.Text:c4=

Form2.Text4.Text:c5=Form3.Text5.Text:c6=Form3.Text6.Text:c7=

Form3.Text7.Text:c8=Form4.Text8.Text:c9=Form4.Text9.Text

Open''f:\xuesheiigziioda.txt''ForOutputAs#1

Write#1,cl,c2,c3,c4,c5,c6,c7,c8,c9

End

EndSub

PrivateSubForm_Load()

EndSub

圖3窗體■查詢

四、總結

本次課程設計我的任務是運用VB制作一個計算機

硬件知識考試系統(tǒng)，運用Access錄入題庫，導入答案至

Txt文檔中，并接對考試時間作控制，選擇以上三項對整

個程序進行設計，我的設計理念是使得程序盡可能的簡

單，顯示的界面盡可能的簡潔，給考生一個整潔的環(huán)境,

這個程序對時間的要求特別的苛刻，督促考生快速作答,

倒計時顯示的也很大，讓學生直觀的看到考試時間，更加

人性化，導入的Txt也方便閱卷人員閱卷。

在此次課設過程中，選擇用什么控件或是命令來實現(xiàn)

題目要求是最為重要的環(huán)節(jié),我選擇的三種解決問題的方

法是最為簡單直觀的，其中一些細節(jié)處理也讓我費盡腦

筋,為了美觀和人性化處理對各個Form之間的顯示與切

換我下個很大功夫。

通過此次課程設計，讓我了解了VB的魅力，也讓我

知道我對編程的不足,對各個編程的軟件及其關聯(lián)有了深

刻了解，總之獲得了許多，再下次課程設計時我會做的更

加完美。

五、完整的源程序

Form5.Show

Forml.Hide

t=60*Val(30)

Timerl.Enabled=True

EndSub

PrivateSubCommand2_Click()

End

EndSub

PrivateSubForm_Load()

EndSub

PrivateSubTimerl_Timer()

DimM,sAsInteger

t=t-1

M=Int(t/60)

s=tMod60

Form5.Labell.Caption=M&"分"&s&r秒

If(t=O)Then

Timerl.Enabled=False

Form2.Hide

Form3.Hide

Form4.Hide

Form5.Hide

EndIf

EndSub

PrivateSubCommandl_Click()

End

EndSub

PrivateSubCommand2_Click()

Form4.Show0

Form2.Hide

EndSub

PrivateSubCommand3_Click()

Form3.Show0

Form2.Hide

EndSub

PrivateSubTextl_Change()

EndSub

PrivateSubForm_Load()

EndSub

PrivateSubCommandl_Click()

Form2.ShowO

Form3.Hide

EndSub

PrivateSubCommand2_Click()

Form4.Show0

Form3.Hide

EndSub

PrivateSubCommand3_Click()

End

EndSub

Pr