【正文】 t change what the objects actually refer to.Copy codeCopy code Range2 = Range1The ranges (Range2 and and Range1 ) have the same contents, but they may point to different locations in the document or even different documents.Collapse sectionUsing the Duplicate property The following instruction creates a new duplicated Range object, Range2 , which has the same start and endpoints and text as Range1 .Copy codeCopy code Set Range2 = If you change the start or endpoint of Range1 , it doesn39。感謝所有鼓勵(lì)、幫助、支持過我的同學(xué)和朋友們，是在與他們的論文和學(xué)習(xí)中解決了我所有的技術(shù)難題，并使我增長了許多知識(shí)。這期間所學(xué)到的知識(shí)和獲得的能力以及做人的道理，都將對(duì)我以后的工作有巨人的幫助，使我受益終生。郭紅教授在百忙中抽出時(shí)間來審閱論文，并對(duì)論文提出許多寶貴的意見和建議。 [9]2000中文版VBA開發(fā)實(shí)例指南[M]．北京:電子工業(yè)出版社,2000.[8]劉文浩,房培玉．Office宏在考試自動(dòng)閱卷中的應(yīng)用[J]．煙臺(tái)師范學(xué)院學(xué)報(bào),2005,21(3).[6] 馬占欣,周文剛．利用VBA實(shí)現(xiàn)對(duì)Office文檔的自動(dòng)評(píng)分[J]．周口師范學(xué)院學(xué)報(bào),2003,20(5).參 考 文 獻(xiàn)[1] ，Word VBA官方文檔.[2] Microsoft．msdn Visual Basic開發(fā)中心技術(shù)資源庫Visual Basic．2008.[3] 王小科、王軍編著，C開發(fā)實(shí)戰(zhàn)1200例[M],北京，清華大學(xué)出版社，2011.[4] 姚利國,姚暉．計(jì)算機(jī)基礎(chǔ)考試中Office操作題自動(dòng)閱卷的實(shí)現(xiàn)[J]．四川教育學(xué)院學(xué)報(bào),2003,19(12).我是大四才對(duì)編程有興趣，剛上大學(xué)只是亂選了一個(gè)專業(yè)，不知道自己需要做些什么，根本不知道計(jì)算機(jī)專業(yè)是干什么的，當(dāng)然這也是跟我當(dāng)時(shí)的心態(tài)有關(guān)，不是很成熟，而通過大四這年的思考，自己知道自己需要做什么，自己喜歡什么，但是開始老想不勞而獲去得到東西，自己很懶，這個(gè)程序是5月20日重做的，電腦硬盤壞了，重做的時(shí)候，發(fā)現(xiàn)還有只是知識(shí)點(diǎn)沒有理解透徹，當(dāng)然有些是在網(wǎng)上看的程序，直接復(fù)制過來的，但是沒有理解，重做的時(shí)候硬盤里面啥資料都沒有，自能通過自己思考來做，做完下來是很辛苦，但是覺得值，這次花了功夫做這個(gè)小程序，可以說增加了自己的自信心，認(rèn)識(shí)到?jīng)]有什么是通過不勞而獲而獲得的。 登錄模塊測(cè)試測(cè)試用例測(cè)試結(jié)果結(jié)果分析用戶名student密碼sone進(jìn)入學(xué)生界面學(xué)生用戶有效用戶名teacher密碼taeyeon進(jìn)入教師界面教師用戶有效用戶名adwda,密碼awdad 彈出不存在用戶對(duì)話框輸入數(shù)據(jù)不匹配用戶名student,密碼dadad彈出密碼錯(cuò)誤對(duì)話框輸入數(shù)據(jù)不匹配結(jié)　　論這次畢業(yè)設(shè)計(jì)，學(xué)習(xí)到了很多知識(shí)，最重要的是認(rèn)識(shí)到了怎么從不懂到懂的過程，沒有什么人是天生就會(huì)的，只有通過學(xué)習(xí)，才能了解的更多，才會(huì)發(fā)現(xiàn)自己懂得東西很少。(5)設(shè)計(jì)測(cè)試用例時(shí)，應(yīng)該考慮各種情況。如果不把著眼點(diǎn)放在盡可能查找錯(cuò)誤這樣一個(gè)基礎(chǔ)上，這些隱藏的錯(cuò)誤和缺陷就查不出來，會(huì)遺留到運(yùn)行階段中去。而從軟件開發(fā)者的角度出發(fā)，則希望測(cè)試成為表明軟件產(chǎn)品中不存在錯(cuò)誤的過程，驗(yàn)證該軟件已正確地實(shí)現(xiàn)了用戶的要求，確立用戶對(duì)軟件質(zhì)量的信心。 第6章 測(cè)試 測(cè)試的目的基于不同的立場(chǎng)，存在著兩種完全不同的測(cè)試目的。 }}在這里還需要注意一點(diǎn)，要導(dǎo)入兩個(gè)Word文檔時(shí)需注意，設(shè)置兩個(gè)進(jìn)程這個(gè)是重點(diǎn)，導(dǎo)入試卷點(diǎn)擊測(cè)評(píng)試卷，顯示分?jǐn)?shù)。}Time觸發(fā)是執(zhí)行動(dòng)作，觸發(fā)間隔為1000msprivate void timer1_Tick(object sender, EventArgs e){ if ( != 0) { DecTime()。 = 29。 = ()。 if (sec == 0) { sec = 59。減少時(shí)間，秒鐘數(shù)減一，如果秒鐘數(shù)值為0那么分鐘數(shù)減一public void DecTime(){ sec。判斷行、列數(shù)是否正確public void Juge_TableColumns( range)public void Juge_TableRows( range)判斷表格設(shè)置是否正確public void Juge_TableSetting( range)public void Juge_TableTextSetting( range)判斷特定表格是否正確public bool Juge_Cell1Setting( range) 定時(shí)器的編寫定義分鐘，秒鐘private int min = 29。也可以將標(biāo)記放置在文檔首，但是這樣的方法我不會(huì)。 }} 函數(shù)部分總結(jié)連接數(shù)據(jù)庫，并且執(zhí)行SQL語句，獲得查詢結(jié)果public void ConToSQL(string sql)執(zhí)行從數(shù)據(jù)庫中讀取分?jǐn)?shù)，并且可以執(zhí)行加分操作。 if (para_style == 14) { AddScore(2)。 //(())。amp。amp。amp。//(數(shù)據(jù)庫讀取數(shù)據(jù)： + sql_para_linespacing + + sql_para_indent + + sql_para_spacebefore + + sql_para_spaceafter)。string sql_para_spaceafter = [0].Rows[0][6].ToString()。string sql_para_indent = [0].Rows[0][2].ToString()。執(zhí)行SQL語句，賦值給全局變量DataSet mydsConToSQL(para_sql)。定義SQL語句：string para_sql = select * from Paragragh where Para_Style = 39。對(duì)文檔屬性的讀取para_linespacing = [1].()。 oDoc。 }執(zhí)行步驟：定義連接字符串、創(chuàng)建連接、打開連接、清空數(shù)據(jù)集中數(shù)據(jù)、新建數(shù)據(jù)集并且執(zhí)行SQL語句、將執(zhí)行后的結(jié)果填充到新表中 打開Word文檔編碼定義進(jìn)程，新建Word進(jìn)程 oWordApp = new ()。 (myds, Doc)。 ()。 SqlConnection sqlcon = new SqlConnection(mycon)。 pwd = 39。word_user39。 DataBase = Word。 VBA學(xué)習(xí)入門 詳情見附錄A。 = 楷體 = 22 = 5287936 = wdAlignParagraphCenter = wdToggleEnd Sub這里39。39。 VBA實(shí)例這里結(jié)合試卷對(duì)象進(jìn)行介紹：比如說怎么操作這個(gè)：將文檔的第一行文字“關(guān)于圖形、圖像和視頻的知識(shí)”作為標(biāo)題，設(shè)為楷體、二號(hào)、加粗、綠色、居中。索引序號(hào)通常是一個(gè)數(shù)值或名稱?？墒褂?位于 Word 對(duì)象結(jié)構(gòu)頂層的)Application 對(duì)象的 Documents 屬性返回 Documents 集合。(4)返回對(duì)象可通過返回集合中單獨(dú)的對(duì)象的方式來返回大多數(shù)對(duì)象。在大多數(shù)情況下，方法是動(dòng)作，而屬性是性質(zhì)。例如，只要文檔可以打印，Document 對(duì)象就具有 PrintOut 方法。此外“Visual Basic 編輯器”中的“對(duì)象瀏覽器”在瀏覽窗口的底部顯示所選屬性的讀寫狀態(tài)。通過返回對(duì)象的一個(gè)屬性值，可以獲取有關(guān)該對(duì)象的信息。不能設(shè)置某些屬性。若要更改一個(gè)對(duì)象的特征，可以修改其屬性值。(2)屬性屬性是對(duì)象的一種特性或該對(duì)象行為的一個(gè)方面。通過使用屬性和方法，可以修改單獨(dú)的的對(duì)象。這里可以分為幾個(gè)方面的了解Word對(duì)象：(1)對(duì)象和集合對(duì)象代表一個(gè) Word 元素，如文檔、段落、書簽或單獨(dú)的字符。 宏的基本應(yīng)用 VBA基本概念對(duì)象是 Visual Basic 的結(jié)構(gòu)基礎(chǔ)，在 Visual Basic 中進(jìn)行的所有操作幾乎都與修改對(duì)象有關(guān)。(6) BottomMargin屬性返回或設(shè)置下頁邊距，即頁底邊與正文文本邊界之間的距離(以磅值為單位)。(5) TopMargin屬性返回或設(shè)置頁上邊與正文文字上邊之間的距離(以磅值為單位)。Single類型，可讀寫。說明：如果將MirrorMargins屬性設(shè)置為True，則LeftMargin屬性將控制內(nèi)部邊距的設(shè)置，而RightMargin屬性將控制外部邊距的設(shè)置。 頁面紙張大小屬性表常量紙張大小索引值xlPaperA3A3(297mm420mm)8xlPaperA4A4(2lOmm297mm)9xlPaperA5 A5(148mm210mm)11XiPaperB5 B5(182mm257m) 120120xlPaperB4B4(250mm354mm) 12xlPaperA4Small A4Small(210mm297mm)10(3) LeftMargin屬性返回或設(shè)置頁左邊與正文文本左邊界之間的距離(以磅值為單位)。其屬性見表414。只讀。它可以用PageSetup屬性返回。 打印頁面(PageSetup)對(duì)象及屬性[1]PageSetup對(duì)象代表頁面設(shè)置描述。?WrapFormat屬性返回一個(gè)WrapFormat對(duì)象，該對(duì)象包含在指定的形狀或形狀范圍四周文字環(huán)繞的屬性。?Width屬性返回或設(shè)置指定對(duì)象的寬度，以磅為單位?？蛇x下列MsoShapeType常量之一：msoAutoShape、msoCallout、msoChart、msoComment、msoEmbeddedOLEObject、msoFormControl、msoFreeform、msoGroup、msoLine、msoLinked0LE0bject、msoLinkedPicture、msoMedia、msoOLEControlObject、msoPicture、msoPlaceholder、msoShapeTypeMixed、msoTextBox或msoTextEffect。對(duì)于包含多個(gè)圖形的ShapeRange對(duì)象，Top屬性將設(shè)置每個(gè)圖形的垂直位置。說明：圖形的位置是根據(jù)圖形邊框的左上角到圖形鎖定標(biāo)志的距離判斷的。?Top屬性返回或設(shè)置指定圖形或圖形區(qū)域的垂直位置，以磅為單位。?Shadow屬性返回一個(gè)ShadowFormat對(duì)象，該對(duì)象代表指定圖形的陰影格式?？梢詾橄铝谐Ａ恐唬簑dRelativeVerticalPositionMargin、wdRelativeVerticalPositionPage或者wdRelativeVerticalPositionParagraph。Long類型，可讀寫。⑩RelativeHorizontalPosition屬性指定圖文框或圖形水平位置參照物。⑨Name屬性返回或設(shè)置圖形名稱。對(duì)于線條來說，LineFormat對(duì)象代表線條本身；而對(duì)于帶有邊框的形狀來說，LineFormat對(duì)象代表邊框。對(duì)于包含多個(gè)圖形的ShapeRange對(duì)象，Left屬性設(shè)置每個(gè)圖形的水平位置。說明：圖形的位置是根據(jù)圖形邊框的左上角到圖形鎖定位置的距離來判斷的。⑦Left屬性返回或設(shè)置指定圖形或圖形區(qū)域的水平位置，以磅為單位。⑥HorizontalFlip屬性如果此屬性為True，則指定形狀繞水平軸旋轉(zhuǎn)。⑤Height屬性返回或設(shè)置指定形狀的高度，以磅為單位。應(yīng)用于表示組合形狀的Shape或ShapeRange對(duì)象。④Groupltems屬性返回一個(gè)GroupShapes對(duì)象，該對(duì)象代表指定形狀組合中的單個(gè)形狀。③Fill屬性返回FillFormat對(duì)象，該對(duì)象包含指定形狀的填充格式屬性。應(yīng)用于代表標(biāo)注的Shape或ShapeRange對(duì)象。Long類型，可讀寫。Shape對(duì)象是Shapes集合的一個(gè)成員，該集合或包含了一篇文檔正文部分的所有形狀，或包含文檔頁眉和頁腳部分中的所有形狀?？捎肔ineStyle屬性設(shè)置Border對(duì)象的框線類型。(6)Borders屬性用Borders(index)可返回單個(gè)Border對(duì)象，其中的index用來標(biāo)識(shí)邊框。(5)Shading屬性返回Shading對(duì)象，此對(duì)象就是指定表格的底紋格式。(4)Rows屬性返回一個(gè)Rows集合，該集合代表某個(gè)范圍、所選部分或表格中所有的表格行。(3)Range屬性返回一個(gè)Range對(duì)象，該對(duì)象代表指定表格所含的部分文檔。(2)Columns屬性返回一個(gè)Columns集合，該集合代表在某一區(qū)域、選定部分或表格中所有表格列?？墒褂肨ables(index)返回一個(gè)Table對(duì)象，其中index為