在richtextbox中实现查找

软件技术国家教学资源库建设项目软件开发素材之C源代码一、名称在RICHTEXTBOX中实现查找二、创建或搜集相关信息搜集单位重庆电子工程职业学院搜集时间20120805来源互联网三、适用对象学生、教师、C及ASPNET项目开发人员、相关技术人员等。四、功能简介在RICHTEXTBOX中实现关键字查找。五、程序代码程序名称PROGRAMCSUSINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMLINQUSINGSYSTEMWINDOWSFORMSNAMESPACEFINDKEYSTATICCLASSPROGRAM/应用程序的主入口点。/STATHREADSTATICVOIDMAINAPPLICATIONENABLEVISUALSTYLESAPPLICATIONSETCOMPATIBLETEXTRENDERINGDEFAULTFALSEAPPLICATIONRUNNEWMAINFORM程序名称MAINFORMCSUSINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMCOMPONENTMODELUSINGSYSTEMDATAUSINGSYSTEMDRAWINGUSINGSYSTEMLINQUSINGSYSTEMTEXTUSINGSYSTEMWINDOWSFORMSUSINGSYSTEMIO/需引用命名空间USINGSYSTEMIONAMESPACEFINDKEYPUBLICPARTIALCLASSMAINFORMFORMPUBLICMAINFORMINITIALIZECOMPONENTPRIVATEVOIDMAINFORM_LOADOBJECTSENDER,EVENTARGSERICHTEXTBOX1READONLYTRUE/设置文本为只读格式STRINGFILEPATH“TESTTXT“/设置打开文件的路径IFFILEEXISTSFILEPATH/当存在该文件时RICHTEXTBOX1LOADFILEFILEPATH,RICHTEXTBOXSTREAMTYPEPLAINTEXTTXTKEYWORDFOCUS/使焦点位于文本框中PRIVATEVOIDBTNOPEN_CLICKOBJECTSENDER,EVENTARGSEOPENFILEDIALOGUTF_8FILENEWOPENFILEDIALOG/表示一个通用对话框，用户可以使用此对话框来指定一个或多个要打开的文件的文件名。UTF_8FILEFILTER“TXT文件（TXT）|TXT“/设置打开对话框的打开过滤参数IFUTF_8FILESHOWDIALOGDIALOGRESULTOK/当在打开对话框中点击“打开”按钮时RICHTEXTBOX1LOADFILEUTF_8FILEFILENAME,RICHTEXTBOXSTREAMTYPEPLAINTEXT/从指定的位置加载TXT文件PRIVATEINTFLAG0/定义一个INT型的标识符PRIVATEVOIDBTNSEARCH_CLICKOBJECTSENDER,EVENTARGSEIFFLAGRICHTEXTBOX1TEXTINDEXOFTXTKEYWORDTEXT,FLAG1/当文件中不存在要搜索的关键字时MESSAGEBOXSHOW“没有要查找的结果“,“提示信息“,MESSAGEBOXBUTTONSOK,MESSAGEBOXICONASTERISK/弹出对应的信息提示TXTKEYWORDCLEAR/清空文本框中的内容FLAG0/重新为FLAG赋值ELSE/当在文件中存在对应的关键字时RICHTEXTBOX1SELECTFLAG,TXTKEYWORDTEXTLENGTH/在RICHTEXTBOX控件中搜索关键字FLAGFLAGTXTKEYWORDTEXTLENGTH/递增标识查询关键字的初始长度RICHTEXTBOX1SELECTIONCOLORCOLORRED/设定关键字为红色PRIVATEVOIDTXTKEYWORD_TEXTCHANGEDOBJECTSENDER,EVENTARGSEIFTXTKEYWORDTEXT“|TXTKEYWORDTEXTNULL/当文本框中不存在内容或者内容为空时BTNSEARCHENAB