VB记事本课程设计报告.docVIP

目 录 第一章 绪 论 1 第二章 系统分析 3 第三章 总体设计与详细设计 4 第四章 编码实现 7 第五章 测试与调试 14 第六章 总结与心得 15 附录一 19 源代码 19 附录二 23 参考文献 23 第一章 绪 论 1.1VB程序现状 在计算机软件技术飞速发展和不断变化的今天，如何选择编程语言来完成应用层次的需求是我们所学习的关键。而Visual basic.NET在快速软件开发和中小型软件开发中具有明显优势，业界使用Visual basic.NET的程序员占有很大的比例，社会需求比较大。 1.2 Visual basic.NET研究背景自从20世纪90年代早期诞生以来，以其强大的功能迅速为广大程序员们所接受。从2001年开始，日本的国内的移动电话开始搭载Java。使用本来就是一种程序语言的之后，就可以在移动电话上完成以往静态的HTML内容所无法达成的计算处理、数据存储、与服务器的通信等等。如果能利用上其他丰富功能，那么就可以实现更多的功能。.2详细设计 设置主面板； 创建主菜单及各级子菜单； 设置编辑、格式、文件三个菜单内容及连接； 设置各子菜单具体内容； 判断是否保存； 3.3流程图 第四章 编码实现 1.实现“新建”功能 Private Sub 新建ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 新建ToolStripMenuItem.Click Dim FileName As String RichTextBox1.Text = FileName = 未命名 Me.Text = FileName End Sub 实现“打开”功能 Private Sub 打开ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 打开ToolStripMenuItem.Click Dim str As String OpenFileDialog1.DefaultExt = TXT OpenFileDialog1.Filter = 文本文件(*.TXT|*.TXT) OpenFileDialog1.ShowDialog() str = OpenFileDialog1.FileName RichTextBox1.LoadFile(str, RichTextBoxStreamType.PlainText) Me.Text = str End Sub 实现“保存”功能 Private Sub 保存ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 保存ToolStripMenuItem.Click SaveFileDialog1.DefaultExt = TXT SaveFileDialog1.Filter = 文本文件(*.TXT|*.TXT) SaveFileDialog1.ShowDialog() Dim str1 As String str1 = SaveFileDialog1.FileName RichTextBox1.SaveFile(str1, RichTextBoxStreamType.PlainText) Me.Text = str1 End Sub 实现“打印”功能 Private Sub 打印ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 打印ToolStripMenuItem.Click Dim pd As System.Drawing.Printing.PrintDocument pd = New System.Drawing.Printing.PrintDocument() PrintDialog1.Document =