VB 应用程序中实现“查找和替换”功能 下载本文源代码 一、前言 尽管Visual Basic 并不是我最喜欢的开发工具,但我喜欢它简单而又丰富的库集。每当开发一个需要处理大量文本数据的应用程序时,需要具有拼写错误纠正功能,例如,微软的Word 程序,当运行"拼写检查"时,将提供给你一个改正错误的机会(尽管是建议),它同时也提供了"查找替换 "工具,用以进行用户定义的单词替换。这篇文章我将解释如何在VB 应用程序中实现"查找替换"功能。 二、前提条件 在解释代码的时候,我假定读者朋友们已经有使用Visual Basic 的经验,熟悉Visual Studio开发环境中各种内置的控件及库函数(尽管我使用的不多)。 我已经尝试着尽可能地简化程序代码,用不了多久你就可以明白程序的逻辑。如果想对一些库函数(如参数,语法)进一步详细地理解,可以参阅MSDN。图一是程序运行后的效果图: 图一、程序实现"查找替换"功能时的效果图 三、基础工作 首先创建一个标准的EXE 类型的VB 工程,将默认窗体更名为frmMainForm ,在默认窗体上增添一个菜单,具体设置如下(符号"&"用于加速键,单词mnu 后的名字用来说明菜单项的名字(在代码中使用)): &Edit 技搜 索 · 操作系统 · 杀· 聊天软件 · 网· ASP · J· JSP · V· PHP · X· VB · V· Java · C· MySQL · S· Oracle · D· Flash · D· Fireworks · F· Photoshop · C· FreeHand · I· Director · A· 视频处理 产品库推荐 · 笔记本 · 数码相机 · DV 摄像机 · CPU · 主板 · 打印机 ...&Find and Replace mnuFindandreplace E&xit mnuExit 向默认窗体添加一个TextBox 控件,命名为txtClientArea。使用鼠标调整控件位置和尺寸,使它覆盖窗体的整个客户区,在属性窗口将这个TextBox 控件的 MultiLine 属性设置为"True"。 使用Project > Add Form 菜单向工程中添加另外一个窗体,将这个窗体命名为"frmFindReplace",并在属性窗口中将它的BorderStyle 属性设置为"4 - FixedToolWindow"。现在,添加两个TextBox 控件,并分别命名为"txtSearchTerm"和 "txtReplaceWithString"。添加一个复选框,命名为chkCaseSense。最后,添加一个命令按钮控件,命名为"cmdReplace"。 在 frmMainForm 窗体中添加如下代码: Private Sub mnuExit_Click() End End Sub Private Sub mnuFindan...