新課程學習信息技術2014 年 2 月 18 日目前大多數學校、教師利用 Word 命制試卷，需要花費大量的時間來收題、排版，而且排版后的試卷格式也不標準。 通過 Word 開發一款自帶試題庫和試卷排版功能的系統，教師可以對題庫中的試題進行添加、修改和刪除等管理，對選好的試題進行自動排版，生成標準的、統一的試卷，每位教師都可以在短時間內高效地完成一份高質量的試卷。一、試卷結構分析以語文試卷為例，紙型為 A3，方向為橫向，版面分左右兩欄，左邊最上面一般為一級標題并居中顯示某次語文考試試卷。 試卷正文大致包括：基礎知識、現代文、文言文和寫作四大塊內容。 基礎知識部分主要是：選擇和填空，在試卷排版中題目需要左縮；現代文部分主要包含：正文內容和正文后的習題，正文內容標題需要居中，正文首行縮進 2 個字符；文言文部分的排版和現代文基本相同；寫作部分排版比較麻煩的是作文格子的編排，它是上下行之間要空開一行的表格。二、系統功能模塊分析本系統主要有三大功能模塊：添加試題、修改試題 （ 包括修改和刪除）和試卷自動生成。 數據庫采用 ，主要考慮它移植方便、便于管理。 試題存放在數據庫中，在對大量試卷分析時發現，一個大題中有若干個小題， 而每個大題所含的小題數都是不同的，所以在設計數據庫時采用了多表并建立關系。

三、系統功能的實現1.添加試題在系統設計需求分析中考慮到教師在命制試卷時，收集試題耗時，試題的保密性差，所以在本系統中直接設計了試題庫。 題庫可以對試題進行有效地保密，因為題庫量很大，組卷時按條件隨機組卷，猜題押寶命中概率很小。 有了題庫，可以馬上啟用備用的平行試卷，或在考試前的最后時刻隨機決定平行試卷中的一套作為正式考卷，從而達到出其不意的效果。 試題庫極大地方便了實現計算機科學的管理 （ 修改、增刪、試卷合理生成、瀏覽、打印等），又因試卷的隨機生成，提高了試卷的保密程度，從而進一步提高了考試的效果，充分體現出考試的嚴肅性和公平性。2.修改試題該模塊主要實現兩個功能：刪除和修改。 教師對該系統庫中的試題可以做出相應的修改，或者對不必要的試題進行刪除操作。這一模塊與上面的添加試題模塊都是引用 ADO 連接 AC－CESS 數據，并對數據保存、修改和刪除。3.自動排版并生成試卷該模塊主要有兩塊內容：試卷版面設置和試卷試題設置。（ 1）試卷版面設置用戶可以在 “ 試卷紙張大小”下拉框中選擇相應的紙型，程序中主要是通過 VBA 的 對象的 .－up. 屬性設置試卷紙張的大小；在 “ 請輸入試卷大標題”文本框中輸入將要生成試卷的標題。

比如， “ 2013 學年第二學期九年級第一次語文月考”，我們在程序中是通過 對象的如下屬性實現：...= （ “ A3”）‘ 設置試卷頁面紙型With ..‘ 對頁面進行分欄.:=2.=True.=.= （ 5.84）.= （ 2.96）End With..=. （ “ 標題 1”）‘ 設置為 “ 標題 1”..Font.Name= “ 黑體” ‘ 字形...=er‘ 對標題居中對齊..Font.Size=18 ‘ 標題字號 18 號.. “ 2013 學年第二學期九年級第一次月考+Chr （ 10）” ‘ 設置一級標題，Chr （ 10）為換行（ 2）試卷試題設置該模塊分為四大塊：基本知識 （ 選擇題和填空題）、現代文、文言文 （ 文言文閱讀和古詩）和寫作。

教師按照試卷的要求選擇需要的題型，在對應題型下輸入題數，若輸入的題數大于系統庫中的題數，則系統會有相應提示。試題是從試題庫中隨機抽取的，并要求不能再次抽中，所以，在隨機生成函數 Rnd 前加上 函數，這樣可以避免抽到的試題被重復抽中。（ 3）試卷的卷面內容排版試卷的排版主要包括試卷的標題、字體大小及段落格式等方面。 這些都可以利用 對象中的以下性能來實現自動排版。..=. （ “ 標題 2”）‘ 設置二級標題..Font.Size=12‘ 二級標題字號為 12 號..Font.Name= “ 黑體”‘ 二級標題字體為宋體摘要：教師一般應用 Word 來命制試卷，但收集試題和排版工作量非常繁重，利用 VBA 在 Word 中的應用，開發一個自帶試題庫，教師可以對題庫進行添加、修改和刪除試題等功能；并能夠對所選擇的題目進行自動排版。 教師可以高效完成一份高質量的試卷，徹底減輕教師命制試題的工作量。關鍵詞：Word；VBA；自動排版VBA 在 Word 中的應用———自動生成試卷文/余姝華124