《visual_c#_2010程序》課程設計報告

瓊州學院電子信息工程學院VISUALC2010程序課程設計報告項目名稱NET程序設計實驗課程建設專業(yè)計算機科學與技術年級2010級姓名李欣徐嘉學號1023705810237070指導老師熊志斌2013年6月實驗實驗1C語法基礎實驗目的（1）掌握VISUALSTUDIO2010集成開發(fā)環(huán)境的使用方法；（2）掌握C應用程序的基本結構、開發(fā)過程和方法；（3）掌握C語言的基礎知識及使用。實驗要求編寫簡單C控制臺應用程序（1）定義學生成績的數(shù)組；（2）對學生成績排序；（3）按照從高分到低分順序輸出，并判斷等級。實驗準備和說明（1）具備知識數(shù)組定義，排序算法，選擇結構的使用。（2）準備本次上機所需要的程序。（3）創(chuàng)建本次實驗項目文件夾“VISUALSTUDIO2010PROJECTS實驗1”實驗內容和步驟1啟動VISUALSTUDIO2010打開計算機，啟動MICROSOFTVISUALSTUDIO2010系統(tǒng)。2創(chuàng)建工程并添加代碼選擇“文件”“新建項目”菜單命令，顯示出“新建項目”對話框。單擊“已安裝的模版”選項，在左邊的列表框中選擇VISUALC語言，在右邊的列表框中選擇“控制臺應用程序”在項目名稱框中輸入TEXT。單擊瀏覽按鈕將項目定位到文件夾“VISUALSTUDIO2010PROJECTS實驗3”。USINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMLINQUSINGSYSTEMTEXTNAMESPACETESTCLASSPROGRAMSTATICVOIDMAINSTRINGARGSINTI,J,TEMP0INTSCONEWINT856,77,90,76,88,57,94,81/定義、初始化成績的數(shù)組STRINGGRADENEWSTRING8/定義成績等級數(shù)組FORI0I“CC1C2CONSOLEWRITELINECREALTOSTRING“CIMAGETOSTRING“I“CC1C2CONSOLEWRITELINECREALTOSTRING“CIMAGETOSTRING“I“CC1C2CONSOLEWRITELINECREALTOSTRING“CIMAGETOSTRING“I“CC1/C2CONSOLEWRITELINECREALTOSTRING“CIMAGETOSTRING“I“CONSOLEREADLINE3運行并測試運行程序，結果如圖21所示。圖21復數(shù)的加減乘除示例圖實驗3繼承與多態(tài)實驗目的（1）初步掌握面向對象程序設計繼承和多態(tài)的概念；（2）掌握繼承和多態(tài)的C實現(xiàn)方法；（3）了解繼承和多態(tài)的作用。實驗要求設計基本幾何圖形的繼承層次結構，并編程實現(xiàn)其中的類，封裝類中的所有字段，通過屬性提供對外的接口；使用繼承實現(xiàn)幾何圖形的層次結構（3層）；計算各種圖形的面積和周長；實驗準備和說明（1）具備知識C繼承、接口、抽象方法、虛方法、多態(tài)。（2）準備本次上機所需要的程序。（3）創(chuàng)建本次實驗項目文件夾“VISUALSTUDIO2010PROJECTS實驗3”實驗內容和步驟1啟動VISUALSTUDIO2010打開計算機，啟動MICROSOFTVISUALSTUDIO2010系統(tǒng)。2創(chuàng)建工程并添加代碼選擇“文件”“新建項目”菜單命令，顯示出“新建項目”對話框。單擊“已安裝的模版”選項，在左邊的列表框中選擇VISUALC語言，在右邊的列表框中選擇“控制臺應用程序”在項目名稱框中輸入JI_CHENG。單擊瀏覽按鈕將項目定位到文件夾“VISUALSTUDIO2010PROJECTS實驗3”。在打開的文檔窗口中輸入下面的代碼2USINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMLINQUSINGSYSTEMTEXTNAMESPACEJI_CHENGCLASSPROGRAMPUBLICABSTRACTCLASSSHAPE/抽象類PUBLICABSTRACTDOUBLEAREAPUBLICABSTRACTDOUBLELENGTHPUBLICCLASSCIRCLESHAPE/圓繼承SHAPE類PUBLICDOUBLER/半徑PUBLICDOUBLER/屬性RGETRETURNRSETRVALUEPUBLICOVERRIDEDOUBLEAREA/面積RETURNMATHPIMATHPOWR,2PUBLICOVERRIDEDOUBLELENGTH/周長RETURNMATHPI2RPUBLICCIRCLEDOUBLERTHISRRPUBLICCLASSSQUARESHAPE/正方形繼承SHAPE類PUBLICDOUBLEEDGE/邊長PUBLICDOUBLEEDGE/屬性EDGEGETRETURNEDGESETEDGEVALUEPUBLICOVERRIDEDOUBLEAREA/重載AREA方法RETURNMATHPOWEDGE,2PUBLICOVERRIDEDOUBLELENGTH/重載LENGTH方法RETURN4EDGEPUBLICSQUAREDOUBLEEDGETHISEDGEEDGECLASSTESTSTATICVOIDMAINSTRINGARGSCONSOLEWRITELINE“請輸入圓的半徑“DOUBLERDOUBLEPARSECONSOLEREADLINESHAPEPNEWCIRCLERCONSOLEWRITELINE“圓的周長0N圓的面積1“,PLENGTH,PAREACONSOLEWRITELINE“請輸入正方形的邊長“DOUBLEEDGEDOUBLEPARSECONSOLEREADLINESHAPEENEWSQUAREEDGECONSOLEWRITELINE“正方形的周長0N正方形的面積1“,ELENGTH,EAREACONSOLEREADLINE3運行并測試編譯并運行程序，在提示命令符下輸入圓的半徑為5，按ENTER鍵，輸入正方形的邊長為4，按ENTER鍵，結果如圖31所示。圖31圓和正方形的周長及面積示例圖4寫出實驗報告實驗4事件編程實驗目的（1）掌握事件的聲明；（2）掌握事件處理程序的原理及應用；（3）定義事件處理函數(shù)。實驗要求設計一個賬戶類，包括賬號，姓名，余額及密碼等變量；定義成員變量的讀寫訪問函數(shù)；定義一個事件，當余額發(fā)生改變時觸發(fā)事件；設計一個類測試賬戶類中的事件。實驗準備和說明（1）具備知識方法的重載、事件的聲明與訂閱。（2）準備本次上機所需要的程序。（3）創(chuàng)建本次實驗項目文件夾“VISUALSTUDIO2010PROJECTS實驗4”實驗內容和步驟1啟動VISUALSTUDIO2010打開計算機，啟動MICROSOFTVISUALSTUDIO2010系統(tǒng)。2創(chuàng)建工程并添加代碼選擇“文件”“新建項目”菜單命令，顯示出“新建項目”對話框。在左邊的列表框中選擇VISUALC語言，在右邊的列表框中選擇“控制臺應用程序”在項目名稱框中輸入CHANGED。單擊瀏覽按鈕將項目定位到文件夾“VISUALSTUDIO2010PROJECTS實驗4”。在打開的文檔窗口中輸入下面的代碼2USINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMLINQUSINGSYSTEMTEXTNAMESPACECHANGEDCLASSACCOUNTPRIVATESTRINGNUMBER/定義成員變量域PRIVATESTRINGNAMEPRIVATEDOUBLEBALANCEDPRIVATESTRINGPASSWORDPUBLICDELEGATEVOIDCHANGEDEVENTHANDEROBJECTSENDER,EVENTARGSE/定義委托代表類型PUBLICEVENTCHANGEDEVENTHANDERCHANGED/聲明事件PROTECTEDVIRTUALVOIDONCHANGEDEVENTARGSE/用以觸發(fā)事件IFTHISCHANGEDNULLTHISCHANGEDTHIS,EPUBLICDOUBLEBALANCE/定義BALANCE屬性GETRETURNTHISBALANCEDSETTHISBALANCEDVALUE/當BALANCE屬性被修改時，觸發(fā)CHANGED事件THISONCHANGEDNEWEVENTARGSPUBLICVOIDACCOUNT1STRINGNUMBER,STRINGNAME,DOUBLEBALANCED,STRINGPASSWORD/存款THISNUMBERNUMBERTHISNAMENAMETHISBALANCEDBALANCEDTHISPASSWORDPASSWORDPUBLICVOIDACCOUNT2STRINGNUMBER,DOUBLEBALANCED,STRINGPASSWORD/取款THISNUMBERNUMBERTHISBALANCEDBALANCEDTHISPASSWORDPASSWORDPUBLICVOIDOUTBCONSOLEWRITELINE“帳號0“,NUMBERCONSOLEWRITELINE“姓名0“,NAMECONSOLEWRITELINE“密碼0“,PASSWORDCONSOLEWRITELINE“餘額0“,BALANCEDCLASSTESTPUBLICSTATICVOIDMAINSTRINGARGSACCOUNTDNEWACCOUNT/將事件處理程序添加到事件的調用列表中即訂閱事件DCHANGEDNEWACCOUNTCHANGEDEVENTHANDERD_CHANGEDDACCOUNT1“12345678567887112“,“陳好“,20000,“543221“DOUTBDACCOUNT2“12345678567887112“,3000,“543221“DOUTBSTRINGSTR“WHILESTR“0“CONSOLEWRITELINE“PLEASEENTERASTRING“STRCONSOLEREADLINEDBALANCESYSTEMCONVERTTODOUBLESTRDOUTB/事件處理函數(shù)PRIVATESTATICVOIDD_CHANGEDOBJECTSENDER,EVENTARGSECONSOLEWRITELINE“此人的余額已改變?yōu)?N“,ACCOUNTSENDERBALANCE3運行并測試編譯并運行程序，在提示命令符中輸入5000，顯示結果如圖41所示。圖41賬戶信息變動圖實驗5文本編輯器的設計與實現(xiàn)實驗目的要求目的掌握面向對象程序設計方法以及WINFORM開發(fā)技術。要求設計并實現(xiàn)一個文本編輯器（1）實現(xiàn)新建文件、打開文件、保存文件、選擇字體、設置顏色功能；（2）添加下拉菜單和彈出菜單，用于選擇不同復制、粘貼、查找等文本編輯功能；（3）添加工具欄，工具欄設置若干按鈕，用于選擇不同的文本編輯功能；（4）添加狀態(tài)欄，顯示狀態(tài)提示信息。實驗準備和說明（1）具備知識WINFORM的應用、菜單、工具欄、狀態(tài)欄。（2）準備本次上機所需要的程序。（3）創(chuàng)建本次實驗項目文件夾“VISUALSTUDIO2010PROJECTS實驗5”實驗內容和步驟1啟動VISUALSTUDIO2010打開計算機，啟動MICROSOFTVISUALSTUDIO2010系統(tǒng)。2創(chuàng)建一個默認的對話框用用程序FORM1選擇“文件”“新建項目”菜單命令，顯示出“新建項目”對話框。在左邊的列表框中選擇VISUALC語言，在右邊的列表框中選擇“WINDOWS窗體應用程序”，在項目名稱框中輸入WEN_BEN。單擊瀏覽按鈕將項目定位到文件夾“VISUALSTUDIO2010PROJECTS實驗5”。3添加菜單在左邊的“工具箱”中選擇，在FORM1窗體上單擊即可顯1示出菜單欄，在MENUSTRIP1屬性窗口中選擇“ITEMS”屬性，點擊打開“項集合編輯器”，在左上方下拉條中選擇MENUITEM，點擊“添加”，然后選中被添加的TOOLSTRIPMENUITEM1，將其TEXT屬性更改為“文件（F）”。在項集合編輯器中按照上述步驟一次添加“編輯（E）”、“格式（O）”、2“查看（V）”、“幫助（H）”菜單項，顯示效果如圖下圖。選中“文件”，單擊DROPDOWNITEMS屬性，打開項集合編輯器，在左上方3選擇MENUITEM，單擊“添加”，在成員列表中出現(xiàn)“TOOLSTRIPMENUITEM1”，在右邊的屬性列表中選擇TEXT屬性，將TOOLSTRIPMENUITEM1改為“新建”，在SHORTCUTKEYS屬性中添加CTRLN快捷鍵。根據(jù)表51所示菜單項，參照圖51設計“文件”菜單。4表51“文件”菜單添加的成員成員NAMETEXTSHORTCUTKEYS新建（N）新建TOOLSTRIPMENUITEM新建CTRLN打開（O）打開OTOOLSTRIPMENUITEM打開CTRLO保存（S）保存STOOLSTRIPMENUITEM保存CTRIS另存為另存為TOOLSTRIPMENUITEM另存為頁面屬性頁面屬性TOOLSTRIPMENUITEM頁面屬性打?。≒）打印PTOOLSTRIPMENUITEM打印退出退出TOOLSTRIPMENUITEM退出CTRLE根據(jù)表52所示菜單項，參照圖52設計“編輯”菜單。5表52“編輯”菜單添加的成員成員NAMETEXTSHORTCUTKEYS撤銷U退出TOOLSTRIPMENUITEM撤銷CTRIU復制C復制CTOOLSTRIPMENUITEM復制CTRLC剪切X剪貼XTOOLSTRIPMENUITEM剪貼CTRLX粘貼P粘貼TOOLSTRIPMENUITEM粘貼CTRLP刪除L刪除LTOOLSTRIPMENUITEM刪除DELETE查找F查找TOOLSTRIPMENUITEM查找CTRLF替換R替換TOOLSTRIPMENUITEM替換CTRLH全選A全選ATOOLSTRIPMENUITEM全選CTRLA時間/日期D時間/日期TOOLSTRIPMENUITEM時間/日期F5根據(jù)表53所示菜單項，參照圖53設計“格式”菜單。6表53“格式”菜單添加的成員成員NAMETEXTSHORTCUTKEYS自動換行W自動換行TOOLSTRIPMENUITEM自動換行字體F字體TOOLSTRIPMENUITEM字體顏色顏色TOOLSTRIPMENUITEM顏色根據(jù)表54所示菜單項，參照圖54設計“查看”菜單。7表54“查看”菜單添加的成員成員NAMETEXTSHORTCUTKEYS狀態(tài)欄狀態(tài)欄TOOLSTRIPMENUITEM狀態(tài)欄根據(jù)表55所示菜單項，參照圖55設計“幫助”菜單。8表55“幫助”菜單添加的成員成員NAMETEXTSHORTCUTKEYS關于記事本A關于記事本TOOLSTRIPMENUITEM關于記事本圖51文件菜單項圖52編輯菜單項圖53格式菜單項圖54查看菜單項圖55幫助菜單項4添加文本框在左邊的“工具箱”中選擇，在FORM1窗體上單擊即可顯示出來。5添加窗體在FORM1窗體中添加一個窗體命名為FORMFIND，TEXT屬性為“查找”，1參看圖56的控件布局，為FORMFIND對話框添加表56的一些控件圖56“查看”對話框布局添加的控件NAMETEXTLABEL1LABEL1查找內容TEXTBOX1TEXTBOX1BUTTON1BUTTON1查找BUTTON2BUTTON2取消表56“查看”對話框添加的控件A在FORMFIND中添加如下代碼PUBLICPARTIALCLASSFORMFINDFORMPUBLICFORMFINDINITIALIZECOMPONENTPUBLICRICHTEXTBOXRTBINTSTART0/查找的起始位置STRINGNR“/查找的內容RICHTEXTBOXFINDSF0B雙擊“查找”按鈕，添加如下代碼PRIVATEVOIDBUTTON1_CLICKOBJECTSENDER,EVENTARGSENRTHISTEXTBOX1TEXT/查找STARTRTBFINDNR,START,FIFSTART1MESSAGEBOXSHOW“對不起查找不到與“NR“相符的內容“,“（記事本查找提示“,MESSAGEBOXBUTTONSOK,MESSAGEBOXICONASTERISKSTART0ELSESTARTSTARTNRLENGTH/找到后從找到位置之后開始下一次RTBFOCUS/給予焦點C雙擊“取消”按鈕，添加如下代碼PRIVATEVOIDBUTTON2_CLICKOBJECTSENDER,EVENTARGSECLOSE為FORM1窗體添加一個窗體，命名為TIHUAN,TEXT屬性為“替換”，參2看圖57的控件布局，為TIHUAN對話框添加表57的一些控件。圖57“替換”對話框添加的控件NAMETEXTLABEL1LABEL1查找內容TEXTBOX1TEXTBOX1LABEL2LABEL2替換為TEXTBOX2TEXTBOX2BUTTON1BUTTON1查找下一個BUTTON2BUTTON2替換BUTTON3BUTTON3全部替換BUTTON4BUTTON4取消表57“替換”對話框添加的控件A為TIHUAN對話框添加如下代碼PUBLICPARTIALCLASSTIHUANFORMPUBLICTIHUANINITIALIZECOMPONENTPUBLICRICHTEXTBOXRTBINTSTART0/開始位置STRINGNR“/定義內容字符串STRINGTH“/定義轉換字符串RICHTEXTBOXFINDSF0INTI0B雙擊“查找下一個”按鈕，添加下列代碼PRIVATEVOIDBUTTON1_CLICKOBJECTSENDER,EVENTARGSENRTHISTEXTBOX1TEXT/將TEXTBOX1中的內容賦值給STARTRTBFINDNR,START,F/開始的位置是找到的內容IFSTART1/找不到啊MESSAGEBOXSHOW“對不起查找不到與“NR“內容相匹配的信息“,“記事本查找提示信息“,MESSAGEBOXBUTTONSOK,MESSAGEBOXICONASTERISKSTART0/返回開始位置ELSESTARTSTARTNRLENGTH/找到后從找到位置之后開始下一次RTBFOCUS/給予焦點，此處不解C雙擊“替換”按鈕，添加下列代碼PRIVATEVOIDBUTTON2_CLICKOBJECTSENDER,EVENTARGSENRTHISTEXTBOX1TEXT/找的內容THTHISTEXTBOX2TEXT/替換的內容/RTBSELECTEDTEXTTH/STARTRTBFINDNR,START,FIFSTART1MESSAGEBOXSHOW“對不起查找不到與“NR“內容相匹配的信息“,“記事本查找提示信息“,MESSAGEBOXBUTTONSOK,MESSAGEBOXICONASTERISKELSERTBSELECTEDTEXTTH/STARTSTARTTHLENGTH/找到后從找到位置之后開始下一次/RTBFOCUS/給予焦點D雙擊“全部替換”按鈕，添加下列代碼PRIVATEVOIDBUTTON3_CLICKOBJECTSENDER,EVENTARGSENRTHISTEXTBOX1TEXT/找的內容THTHISTEXTBOX2TEXTSTARTRTBFINDNR,START,FWHILESTART1RTBSELECTEDTEXTTHSTARTSTARTNRLENGTHSTARTRTBFINDNR,START,FIMESSAGEBOXSHOW“全部替換完畢,全部一共替換了“ITOSTRING“次“,“記事本替換完畢信息“START0E雙擊“取消”按鈕，添加如下代碼PRIVATEVOIDBUTTON4_CLICKOBJECTSENDER,EVENTARGSETHISCLOSE為FORM1窗體添加一個新窗體，命名為FORMABOUT，TEXT屬性為關于3“記事本”，參看圖58的控件布局，為FORMABOUT對話框添加表58的一些控件。圖58“關于記事本”布局添加的控件NAMETEXTLABEL1LABEL1LABEL1BUTTON1BUTTON1關閉表58“關于記事本”添加的控件A為FORMABOUT對話框添加如下代碼PRIVATEVOIDFORMABOUT_LOADOBJECTSENDER,EVENTARGSEMAXIMIZEBOXFALSE/沒有最大化MINIMIZEBOXFALSE/沒有最小化LABEL1TEXT“MICROSOFTR文本文檔版本模擬WINDOWS記事本，添加部分OFFCEN功能版權所有嚴禁盜版本產品最終解釋權歸冰點所有?！癇雙擊“關閉”按鈕，添加下列代碼PRIVATEVOIDBUTTON1_CLICKOBJECTSENDER,EVENTARGSECLOSE6添加成員響應代碼雙擊“新建”，輸入如下代碼1PRIVATEVOID新建TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEIFRICHTEXTBOX1MODIFIEDTRUEDIALOGRESULTWWMESSAGEBOXSHOW“是否將更改保存到DT新建文本文檔TXT“,“記事本“,MESSAGEBOXBUTTONSYESNOCANCEL,MESSAGEBOXICONWARNINGSWITCHWW/使SWITCH用語句判斷CASEDIALOGRESULTYESTHIS保存STOOLSTRIPMENUITEM_CLICKSENDER,EBREAKCASEDIALOGRESULTNORICHTEXTBOX1CLEARBREAKCASEDIALOGRESULTCANCELBREAK雙擊“打開”，輸入下列代碼2PRIVATEVOID打開OTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEOPENFILEDIALOGOFDNEWOPENFILEDIALOGOFDADDEXTENSIONTRUEOFDCHECKFILEEXISTSTRUEOFDTITLE“打開“OFDFILTER“文本文檔|TXT|所有文件|“OFDFILTERINDEX4OFDINITIALDIRECTORY“D“OFDMULTISELECTTRUEOFDRESTOREDIRECTORYTRUEOFDSHOWREADONLYTRUEOFDSHOWHELPTRUEOFDSHOWDIALOGTHISRICHTEXTBOX1TAGOFDFILENAME/文本文檔名，可無RICHTEXTBOX1LOADFILEOFDFILENAME,RICHTEXTBOXSTREAMTYPEPLAINTEXT/加載文本中的內容雙擊“保存”，輸入下列代碼3PRIVATEVOID保存STOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSETRY/使用語句處理異常情況STREAMWRITERBCNEWSTREAMWRITERNAME,FALSE,ENCODINGGETENCODING“GB2312“/字節(jié)流GB2312國標STRINGBAOCUNRICHTEXTBOX1TEXTBCWRITEBAOCUNBCCLOSECATCHSAVEFILEDIALOGSAVEFILEDIALOG1NEWSAVEFILEDIALOGSAVEFILEDIALOG1FILTER“文本文檔（TXT|TXT|所有文件|“SAVEFILEDIALOG1OVERWRITEPROMPTTRUE/如果文件名已經存在警告IFRICHTEXTBOX1TEXT“MESSAGEBOXSHOW“當前文本中沒有任何內容“,“提示“ELSEIFSAVEFILEDIALOG1SHOWDIALOGDIALOGRESULTOKSTREAMWRITERCNEWSTREAMWRITERSAVEFILEDIALOG1FILENAME,FALSE,ENCODINGGETENCODING“GB2312“NAMESAVEFILEDIALOG1FILENAMESTRINGDRICHTEXTBOX1TEXT/將文本中的字符串賦值給局部變量CWRITED/將字符串重載CCLOSE雙擊“另存為”，輸入下列代碼4PRIVATEVOID另存為TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEIFRICHTEXTBOX1MODIFIEDTRUEDIALOGRESULTCLOSEMESSAGEBOXSHOW“是否保存已修改的內容“,“提示“,MESSAGEBOXBUTTONSYESNO,MESSAGEBOXICONWARNINGSWITCHCLOSECASEDIALOGRESULTYESTHIS保存STOOLSTRIPMENUITEM_CLICKSENDER,ETRY/使用語句處理異常情況STREAMWRITERSWWNEWSTREAMWRITERNAME,FALSE,ENCODINGGETENCODING“GB2312“STRINGDATARICHTEXTBOX1TEXTSWWWRITEDATASWWCLOSECATCHSAVEFILEDIALOGSAVEFILEDIALOG1NEWSAVEFILEDIALOGSAVEFILEDIALOG1FILTER“文件|TXT“SAVEFILEDIALOG1FILENAME“新建文本文檔TXT“SAVEFILEDIALOG1OVERWRITEPROMPTTRUE/已經存在文件名警告IFSAVEFILEDIALOG1SHOWDIALOGDIALOGRESULTOKSTREAMWRITERSWWNEWSTREAMWRITERSAVEFILEDIALOG1FILENAME,FALSE,ENCODINGGETENCODING“GB2312“NAMESAVEFILEDIALOG1FILENAMESTRINGDATARICHTEXTBOX1TEXTSWWWRITEDATASWWCLOSEBREAKCASEDIALOGRESULTNOBREAK雙擊“頁面屬性”，輸入下列代碼5PRIVATEVOID頁面屬性TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEPAGESETUPDIALOGPAGESETUPDIALOG1NEWPAGESETUPDIALOGSYSTEMDRAWINGPRINTINGPRINTDOCUMENTPAGNEWSYSTEMDRAWINGPRINTINGPRINTDOCUMENTPAGESETUPDIALOG1SHOWNETWORKFALSEPAGESETUPDIALOG1DOCUMENTPAGIFPAGESETUPDIALOG1SHOWDIALOGDIALOGRESULTCANCELPAGPRINT雙擊“打印”，輸入下列代碼6PRIVATEVOID打印PTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEPRINTDIALOGPDNEWPRINTDIALOGSYSTEMDRAWINGPRINTINGPRINTDOCUMENTPDDNEWSYSTEMDRAWINGPRINTINGPRINTDOCUMENTPDSHOWNETWORKFALSEPDPRINTTOFILEFALSEPDDOCUMENTPDDIFPDSHOWDIALOGDIALOGRESULTCANCELPDDPRINT雙擊“退出”，輸入下列代碼7PRIVATEVOID退出TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEIFTHISRICHTEXTBOX1MODIFIEDTRUEDIALOGRESULTTCMESSAGEBOXSHOW“文件“THISTEXT“的內容已經修改是否要保存“,“提示“,MESSAGEBOXBUTTONSYESNOCANCEL,MESSAGEBOXICONEXCLAMATIONIFTCDIALOGRESULTYES另存為TOOLSTRIPMENUITEM_CLICKSENDER,ETHISRICHTEXTBOX1CLEARTHISTEXT“IFTCDIALOGRESULTNOAPPLICATIONEXITELSEAPPLICATIONEXIT雙擊“撤銷”，輸入下列代碼8PRIVATEVOID撤銷UTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1UNDO雙擊“剪切”，輸入下列代碼9PRIVATEVOID剪切XTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1CUT雙擊“復制”，輸入下列代碼10PRIVATEVOID復制CTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1COPY雙擊“粘貼”，輸入下列代碼11PRIVATEVOID粘貼TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1PASTE雙擊“刪除”，輸入下列代碼12PRIVATEVOID刪除LTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1SELECTEDTEXT“雙擊“查找”，輸入下列代碼13PRIVATEVOID查找TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSE/FINDPOSITION0/FORMFINDFINDREPLACEDIALOGNEWFORMFIND/FINDREPLACEDIALOGSHOWFORMFINDFNEWFORMFINDFRTBTHISRICHTEXTBOX1/傳值（從主窗口傳到FINDFORM）FOWNERTHIS/懸浮于當前窗體FSHOW雙擊“全選”，輸入下列代碼14PRIVATEVOID全選ATOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1SELECTALL雙擊“替換”，輸入下列代碼15PRIVATEVOID替換RTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSETIHUANNEWTHNEWTIHUAN/NEWTHSHOWNEWTHRTBTHISRICHTEXTBOX1/傳值（從主窗口傳到FINDFORM）NEWTHOWNERTHIS/懸浮于當前窗體NEWTHSHOW/TIHUANNEWTHNEWTIHUAN/NEWTHSHOW雙擊“時間/日期”，輸入下列代碼16PRIVATEVOID時間日期TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1TEXTRICHTEXTBOX1TEXTDATETIMENOWTOSTRING雙擊“自動換行”，輸入下列代碼17PRIVATEVOID自動換行WTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSERICHTEXTBOX1WORDWRAPTRUE雙擊“字體”，輸入下列代碼18PRIVATEVOID字體FTOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEFONTDIALOGFDNEWFONTDIALOGFDALLOWSCRIPTCHANGETRUEFDSHOWCOLORTRUEFDALLOWSIMULATIONSTRUEFDALLOWVECTORFONTSTRUEFDFONTMUSTEXISTTRUEFDMAXSIZE30FDMINSIZE6FDSHOWAPPLYTRUEFDSHOWCOLORTRUEFDSHOWEFFECTSTRUEIFFDSHOWDIALOGDIALOGRESULTOK/獲取對話框的返回值是確定RICHTEXTBOX1SELECTIONFONTFDFONT/獲取系統(tǒng)的字體RICHTEXTBOX1SELECTIONCOLORFDCOLOR雙擊“顏色”，輸入下列代碼19PRIVATEVOID顏色TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSECOLORDIALOGCDNEWCOLORDIALOGCDALLOWFULLOPENTRUECDFULLOPENTRUECDCOLORCOLORBLACKCDSOLIDCOLORONLYFALSECDSHOWHELPTRUECDSHOWDIALOGRICHTEXTBOX1SELECTIONCOLORCDCOLOR雙擊“狀態(tài)欄”，輸入下列代碼20PRIVATEVOID狀態(tài)欄TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEIFK1STATUSSTRIP1SHOW狀態(tài)欄TOOLSTRIPMENUITEMCHECKEDTRUEK0ELSESTATUSSTRIP1HIDE狀態(tài)欄TOOLSTRIPMENUITEMCHECKEDFALSEK1雙擊“關于記事本”，輸入下列代碼21PRIVATEVOID關于記事本TOOLSTRIPMENUITEM_CLICKOBJECTSENDER,EVENTARGSEFORMABOUTABOUTNEWFORMABOUTABOUTSHOWDIALOG在FORM1加載時，添加如下代碼22PRIVATEVOIDFORM1_LOADOBJECTSENDER,EVENTARGSE撤銷UTOOLSTRIPMENUITEMENABLED