用vb写记事本的程序.docx

文件编码（GHTU-UITID-GGBKT-POIU-WUUI-8968） 文件编码（GHTU-UITID-GGBKT-POIU-WUUI-8968）

用VB写记事本的程序

可视化程序课程—记事本程序实验报告

1、新建工程

启动VB程序后，建立一个新的工程。出现“窗体设计器”。

2、创建记事本的菜单栏

打开工具选项条 单击菜单编辑器

（1）在标题栏里面分别添加“文件（&F）”“编辑（&E）”“格式（&A）”“帮助（&H）”并分别设置名称和快捷键。

（2）分别在“文件”“编辑”“格式”“帮助”选项下编辑如图所示的的子菜单，设置标题，名称，快捷键。

3、代码的编写

（1）文件 file

①新建 new

注解： = "无标题-记事本" 把新建记事本的名字定义为“无标题-记事本”

②打开 open

注解：“On Error GoTo a ” a在代码倒数第二行有定义，如果在打开的过程中出现错误就到“a” 退出程序；Dim index As Integer定义变量

③保存 save

④另存为 as

注解：定义一个变量ss作为字符串 如果正确执行操作 错误就执行a退出

⑤打印 print

⑥退出 exit

（2）编辑 editing

①剪切 cut

②复制 copy

③粘贴 past

④删除 delete

⑤查找 find

注释：sFind = InputBox 查找输入框

MsgBox "找不到所要查询的内容", , "查询无果报告"

⑥ 查找下一个 findnext

⑦全选 seleall

（3）格式

①自动换行 autonewline

②字体 fond

（4）帮助 help